// creator : weidu (version 21300) // argument : WSMITH01.DLG // game : . // source : ./override/WSMITH01.DLG // dialog : ./dialog.tlk // dialogF : (none) BEGIN ~WSMITH01~ ////////////////////////////////////////////////// // WARNING: this file contains non-trivial WEIGHTs ////////////////////////////////////////////////// IF WEIGHT #3 /* Triggers after states #: 142 349 458 even though they appear after this state */ ~NumberOfTimesTalkedTo(0) ~ THEN BEGIN 0 // from: SAY #59654 /* ~Eh? Who's there? Some wanderin' in me smithy, I see. I rarely gets vistors, with the blisterin' heat and all... something I can do for ye, ?~ */ IF ~GlobalGT("CbMalteseArtifact","GLOBAL",4) !GlobalGT("CbCromwellDestroysCrown","AR0334",0) ~ THEN REPLY #99961 /* ~Actually, I understand that you can forge some pretty nice weapons. I was wondering if you could do that for all silver- or metal-work, or just weapons.~ */ GOTO 62 IF ~GlobalGT("CbMalteseArtifact","GLOBAL",4) PartyHasItem("CBMALR6a") Global("SPRITE_IS_DEADCBMALR1","GLOBAL",1) ~ THEN REPLY #99962 /* ~I need you to do something, good Cromwell. I need this artifact destroyed. It is of great evil, and cannot be found. Take it; take it and destroy it.~ */ GOTO 74 IF ~~ THEN REPLY #59658 /* ~Who are you?~ */ GOTO 1 IF ~~ THEN REPLY #59659 /* ~What do you have for sale, here?~ */ GOTO 2 IF ~~ THEN REPLY #59660 /* ~Well, you can stop calling me "", for starters.~ */ GOTO 3 IF ~~ THEN REPLY #59661 /* ~No thanks. I'll be on my way.~ */ GOTO 4 IF ~PartyHasItem("CLFTFG") ~ THEN REPLY #177558 /* ~I have a favor to ask regarding this troll finger.~ */ GOTO 123 IF ~Global("wsmith01-0","GLOBAL",0) IfValidForPartyDialogue("Kova") InMyArea("Kova") Global("GreetCrom","GLOBAL",0) ~ THEN DO ~SetGlobal("wsmith01-0","GLOBAL",1) ~ GOTO 359 IF ~Global("SheenaCromwell1","GLOBAL",0) IfValidForPartyDialogue("k#Sheena") !Dead("K#Sheena") ~ THEN DO ~SetGlobal("SheenaCromwell1","GLOBAL",1) ~ EXTERN ~SHEENAJ~ 281 IF ~Global("G3BigRobActivated","GLOBAL",3) ~ THEN REPLY #336197 /* ~Do you have a commission waiting for Robukin Rockskull?~ */ DO ~SetGlobal("G3BigRobActivated","GLOBAL",4) ~ GOTO 449 IF ~PartyHasItem("G3BRSCRL") ~ THEN REPLY #336198 /* ~I've brought the scroll from Robukin, do you have his oil? ~ */ GOTO 454 END IF ~~ THEN BEGIN 1 // from: 361.2 0.2 SAY #59662 /* ~My name be Cromwell. Now mayhap ye'll tell me who ye are, aye?~ */ IF ~GlobalGT("CbMalteseArtifact","GLOBAL",4) !GlobalGT("CbCromwellDestroysCrown","AR0334",0) ~ THEN REPLY #99961 /* ~Actually, I understand that you can forge some pretty nice weapons. I was wondering if you could do that for all silver- or metal-work, or just weapons.~ */ GOTO 62 IF ~GlobalGT("CbMalteseArtifact","GLOBAL",4) PartyHasItem("CBMALR6a") Global("SPRITE_IS_DEADCBMALR1","GLOBAL",1) ~ THEN REPLY #99962 /* ~I need you to do something, good Cromwell. I need this artifact destroyed. It is of great evil, and cannot be found. Take it; take it and destroy it.~ */ GOTO 74 IF ~CheckStatGT(LastTalkedToBy,12,CHR) ~ THEN REPLY #59664 /* ~I am . Pleased to meet you.~ */ GOTO 5 IF ~CheckStatLT(LastTalkedToBy,13,CHR) ~ THEN REPLY #59665 /* ~I am , if you really must know.~ */ GOTO 6 IF ~~ THEN REPLY #59667 /* ~You don't need to know my name, I'm sure.~ */ GOTO 7 IF ~~ THEN REPLY #59668 /* ~Forget introductions, I just want to see what you have for sale.~ */ GOTO 2 IF ~Global("G3BigRobActivated","GLOBAL",3) ~ THEN REPLY #336197 /* ~Do you have a commission waiting for Robukin Rockskull?~ */ DO ~SetGlobal("G3BigRobActivated","GLOBAL",4) ~ GOTO 449 IF ~PartyHasItem("G3BRSCRL") ~ THEN REPLY #336198 /* ~I've brought the scroll from Robukin, do you have his oil? ~ */ GOTO 454 END IF ~~ THEN BEGIN 2 // from: 453.0 364.3 361.3 123.2 58.3 7.0 6.2 5.2 3.5 1.5 0.3 SAY #59670 /* ~I be not selling ye anything. I be the finest blacksmith in Athkatla, and I works on commission only. I can make most anything ye desire.~ */ IF ~GlobalGT("CbMalteseArtifact","GLOBAL",4) !GlobalGT("CbCromwellDestroysCrown","AR0334",0) ~ THEN REPLY #99961 /* ~Actually, I understand that you can forge some pretty nice weapons. I was wondering if you could do that for all silver- or metal-work, or just weapons.~ */ GOTO 62 IF ~GlobalGT("CbMalteseArtifact","GLOBAL",4) PartyHasItem("CBMALR6a") Global("SPRITE_IS_DEADCBMALR1","GLOBAL",1) ~ THEN REPLY #99962 /* ~I need you to do something, good Cromwell. I need this artifact destroyed. It is of great evil, and cannot be found. Take it; take it and destroy it.~ */ GOTO 74 IF ~~ THEN REPLY #59671 /* ~What sorts of things do you make?~ */ GOTO 8 IF ~~ THEN REPLY #59672 /* ~Can you make magical armor and weapons and the like?~ */ GOTO 8 IF ~~ THEN REPLY #59673 /* ~Well, I'll be on my way, then.~ */ GOTO 4 IF ~Global("G3BigRobActivated","GLOBAL",3) ~ THEN REPLY #336197 /* ~Do you have a commission waiting for Robukin Rockskull?~ */ DO ~SetGlobal("G3BigRobActivated","GLOBAL",4) ~ GOTO 449 IF ~PartyHasItem("G3BRSCRL") ~ THEN REPLY #336198 /* ~I've brought the scroll from Robukin, do you have his oil? ~ */ GOTO 454 END IF ~~ THEN BEGIN 3 // from: 361.4 0.4 SAY #59676 /* ~As ye wish. I meant no offense by it, friend. Is there something else ye wish Cromwell to call ye by, instead?~ */ IF ~GlobalGT("CbMalteseArtifact","GLOBAL",4) !GlobalGT("CbCromwellDestroysCrown","AR0334",0) ~ THEN REPLY #99961 /* ~Actually, I understand that you can forge some pretty nice weapons. I was wondering if you could do that for all silver- or metal-work, or just weapons.~ */ GOTO 62 IF ~GlobalGT("CbMalteseArtifact","GLOBAL",4) PartyHasItem("CBMALR6a") Global("SPRITE_IS_DEADCBMALR1","GLOBAL",1) ~ THEN REPLY #99962 /* ~I need you to do something, good Cromwell. I need this artifact destroyed. It is of great evil, and cannot be found. Take it; take it and destroy it.~ */ GOTO 74 IF ~~ THEN REPLY #59677 /* ~I am . Pleased to meet you.~ */ GOTO 5 IF ~~ THEN REPLY #59678 /* ~I am , if you really must know.~ */ GOTO 6 IF ~~ THEN REPLY #59679 /* ~You don't need to know my name, I'm sure.~ */ GOTO 7 IF ~~ THEN REPLY #59680 /* ~Forget introductions, I just want to see what you have for sale.~ */ GOTO 2 IF ~Global("G3BigRobActivated","GLOBAL",3) ~ THEN REPLY #336197 /* ~Do you have a commission waiting for Robukin Rockskull?~ */ DO ~SetGlobal("G3BigRobActivated","GLOBAL",4) ~ GOTO 449 IF ~PartyHasItem("G3BRSCRL") ~ THEN REPLY #336198 /* ~I've brought the scroll from Robukin, do you have his oil? ~ */ GOTO 454 END IF ~~ THEN BEGIN 4 // from: 453.3 361.5 98.0 91.0 86.0 85.0 79.0 9.2 7.3 6.5 5.4 2.4 0.5 SAY #59681 /* ~Mind the mess on yer way out, . Me apprentice just returned to Abdar, sure enough, and I've no patience for housekeeping.~ */ IF ~GlobalGT("CbMalteseArtifact","GLOBAL",4) !GlobalGT("CbCromwellDestroysCrown","AR0334",0) ~ THEN REPLY #99961 /* ~Actually, I understand that you can forge some pretty nice weapons. I was wondering if you could do that for all silver- or metal-work, or just weapons.~ */ GOTO 62 IF ~GlobalGT("CbMalteseArtifact","GLOBAL",4) PartyHasItem("CBMALR6a") Global("SPRITE_IS_DEADCBMALR1","GLOBAL",1) ~ THEN REPLY #99962 /* ~I need you to do something, good Cromwell. I need this artifact destroyed. It is of great evil, and cannot be found. Take it; take it and destroy it.~ */ GOTO 74 IF ~~ THEN EXIT END IF ~~ THEN BEGIN 5 // from: 3.2 1.2 SAY #59682 /* ~Aye. Welcome to me smithy, . Was there something that ye needed from an old dwarf, mayhap?~ */ IF ~GlobalGT("CbMalteseArtifact","GLOBAL",4) !GlobalGT("CbCromwellDestroysCrown","AR0334",0) ~ THEN REPLY #99961 /* ~Actually, I understand that you can forge some pretty nice weapons. I was wondering if you could do that for all silver- or metal-work, or just weapons.~ */ GOTO 62 IF ~GlobalGT("CbMalteseArtifact","GLOBAL",4) PartyHasItem("CBMALR6a") Global("SPRITE_IS_DEADCBMALR1","GLOBAL",1) ~ THEN REPLY #99962 /* ~I need you to do something, good Cromwell. I need this artifact destroyed. It is of great evil, and cannot be found. Take it; take it and destroy it.~ */ GOTO 74 IF ~~ THEN REPLY #59683 /* ~I would like to see what you have for sale.~ */ GOTO 2 IF ~~ THEN REPLY #59684 /* ~What sort of smithing do you do?~ */ GOTO 8 IF ~~ THEN REPLY #59685 /* ~Not really. I'll be on my way.~ */ GOTO 4 IF ~Global("G3BigRobActivated","GLOBAL",3) ~ THEN REPLY #336197 /* ~Do you have a commission waiting for Robukin Rockskull?~ */ DO ~SetGlobal("G3BigRobActivated","GLOBAL",4) ~ GOTO 449 IF ~PartyHasItem("G3BRSCRL") ~ THEN REPLY #336198 /* ~I've brought the scroll from Robukin, do you have his oil? ~ */ GOTO 454 END IF ~~ THEN BEGIN 6 // from: 3.3 1.3 SAY #59687 /* ~Nay, I care not... but ye're in me smithy, and it be only polite. Now, ... be there something ye need from an old dwarf, or does ye just like the smoke?~ */ IF ~GlobalGT("CbMalteseArtifact","GLOBAL",4) !GlobalGT("CbCromwellDestroysCrown","AR0334",0) ~ THEN REPLY #99961 /* ~Actually, I understand that you can forge some pretty nice weapons. I was wondering if you could do that for all silver- or metal-work, or just weapons.~ */ GOTO 62 IF ~GlobalGT("CbMalteseArtifact","GLOBAL",4) PartyHasItem("CBMALR6a") Global("SPRITE_IS_DEADCBMALR1","GLOBAL",1) ~ THEN REPLY #99962 /* ~I need you to do something, good Cromwell. I need this artifact destroyed. It is of great evil, and cannot be found. Take it; take it and destroy it.~ */ GOTO 74 IF ~~ THEN REPLY #59688 /* ~I would like to see what you have for sale.~ */ GOTO 2 IF ~~ THEN REPLY #59689 /* ~What sort of smithing do you do?~ */ GOTO 8 IF ~~ THEN REPLY #59690 /* ~And what if I said I only want to look around?~ */ GOTO 10 IF ~~ THEN REPLY #59691 /* ~Not really. I'll be on my way.~ */ GOTO 4 IF ~Global("G3BigRobActivated","GLOBAL",3) ~ THEN REPLY #336197 /* ~Do you have a commission waiting for Robukin Rockskull?~ */ DO ~SetGlobal("G3BigRobActivated","GLOBAL",4) ~ GOTO 449 IF ~PartyHasItem("G3BRSCRL") ~ THEN REPLY #336198 /* ~I've brought the scroll from Robukin, do you have his oil? ~ */ GOTO 454 END IF ~~ THEN BEGIN 7 // from: 3.4 1.4 SAY #59692 /* ~That be true, but it be me own smithy, here, and you be the guest. But I care not. Mayhap ye'll tell me what ye wish from an old dwarf and be on yer way, aye?~ */ IF ~~ THEN REPLY #59693 /* ~I would like to see what you have for sale.~ */ GOTO 2 IF ~~ THEN REPLY #59694 /* ~What sort of smithing do you do?~ */ GOTO 8 IF ~~ THEN REPLY #59695 /* ~And what if I said I only want to look around?~ */ GOTO 10 IF ~~ THEN REPLY #59696 /* ~Not really. I'll be on my way.~ */ GOTO 4 IF ~Global("G3BigRobActivated","GLOBAL",3) ~ THEN REPLY #336197 /* ~Do you have a commission waiting for Robukin Rockskull?~ */ DO ~SetGlobal("G3BigRobActivated","GLOBAL",4) ~ GOTO 449 IF ~PartyHasItem("G3BRSCRL") ~ THEN REPLY #336198 /* ~I've brought the scroll from Robukin, do you have his oil? ~ */ GOTO 454 END IF ~~ THEN BEGIN 8 // from: 453.1 364.2 123.1 58.2 7.1 6.3 5.3 2.3 2.2 SAY #59697 /* ~I've made armor from the scales of a basilisk, a helmet from a cockatrice... items to put fear into the hearts of the bloody gods themselves. Hah! ~ */ IF ~~ THEN DO ~SetGlobal("TalkedToCromwell","LOCALS",1) ~ GOTO 9 END IF ~~ THEN BEGIN 9 // from: 8.0 SAY #59698 /* ~All of me work be done from commissions. Give me the ingredients and I can forge an item of power, sure enough. 'Tis a good living, for a smith of me skills.~ */ IF ~~ THEN REPLY #59699 /* ~Do I have anything you could forge into an item?~ */ GOTO 13 IF ~~ THEN REPLY #59700 /* ~What sorts of things would you need in order to make something?~ */ GOTO 11 IF ~~ THEN REPLY #59701 /* ~I suppose so. I'll be on my way.~ */ GOTO 4 IF ~Global("G3BigRobActivated","GLOBAL",3) ~ THEN REPLY #336197 /* ~Do you have a commission waiting for Robukin Rockskull?~ */ DO ~SetGlobal("G3BigRobActivated","GLOBAL",4) ~ GOTO 449 IF ~PartyHasItem("G3BRSCRL") ~ THEN REPLY #336198 /* ~I've brought the scroll from Robukin, do you have his oil? ~ */ GOTO 454 END IF ~~ THEN BEGIN 10 // from: 453.2 7.2 6.4 SAY #59702 /* ~Well, that be your choice. There be only scrap metals an' such about... hardly something to interest ye, I'm sure, but ye can never tell about some folk.~ */ IF ~~ THEN EXIT END IF ~~ THEN BEGIN 11 // from: 364.4 123.3 58.4 9.1 SAY #59703 /* ~Well, now, that depends. Rare scales or husks, mayhap, or a magical metal I could forge. Even the pieces to a larger item can be repaired. My skills are many.~ */ IF ~~ THEN REPLY #59704 /* ~Do I have anything you could forge into something, then?~ */ GOTO 13 IF ~~ THEN REPLY #59705 /* ~I see. I'll be going, then.~ */ GOTO 12 IF ~Global("G3BigRobActivated","GLOBAL",3) ~ THEN REPLY #336197 /* ~Do you have a commission waiting for Robukin Rockskull?~ */ DO ~SetGlobal("G3BigRobActivated","GLOBAL",4) ~ GOTO 449 IF ~PartyHasItem("G3BRSCRL") ~ THEN REPLY #336198 /* ~I've brought the scroll from Robukin, do you have his oil? ~ */ GOTO 454 END IF ~~ THEN BEGIN 12 // from: 388.2 364.6 126.2 126.1 61.2 58.6 55.2 54.7 53.7 11.1 SAY #59706 /* ~Another time, then, me friend. Cromwell wishes ye a fair journey.~ */ IF ~~ THEN EXIT END IF ~~ THEN BEGIN 13 // from: 448.0 447.0 446.0 364.5 348.1 347.1 346.1 345.1 344.1 343.0 123.4 58.5 11.0 9.0 SAY #59707 /* ~Hmmmn... I couldn't rightly say. Let me have a look into yer goods, then. A minute of rummagin' and I'll know fer sure, aye?~ */ IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#bchide") !PartyHasItem("m#wskin") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(2) PartyHasItem("sw1h40") PartyHasItem("m#jbrace") ~ THEN DO ~ActionOverride("M#Amber",SetDialogue("m#ambern")) ~ GOTO 321 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npshld") ~ THEN GOTO 144 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun22") ~ THEN GOTO 158 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun18") ~ THEN GOTO 162 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("sdnpcsw3") ~ THEN REPLY #329138 /* ~Can you make a daikatana out of Celestial Fury?~ */ GOTO 84 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot02") ~ THEN GOTO 170 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot03") ~ THEN GOTO 174 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot04") ~ THEN GOTO 178 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot05") ~ THEN GOTO 182 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("bow10") ~ THEN GOTO 186 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("chan14") ~ THEN GOTO 195 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm04") ~ THEN GOTO 208 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm06") ~ THEN GOTO 212 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("leat20") ~ THEN GOTO 216 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npplat") ~ THEN GOTO 220 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("plat06") ~ THEN GOTO 236 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring06") ~ THEN GOTO 240 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring07") ~ THEN GOTO 244 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck16") ~ THEN GOTO 261 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck17") ~ THEN GOTO 265 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld25") ~ THEN GOTO 269 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld17") ~ THEN GOTO 273 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper06") ~ THEN GOTO 277 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper07") ~ THEN GOTO 281 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper08") ~ THEN GOTO 285 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("staf15") PartyHasItem("staf16") PartyHasItem("staf17") ~ THEN GOTO 289 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("staf14") ~ THEN GOTO 293 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h31") ~ THEN GOTO 297 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h51") ~ THEN GOTO 301 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h52") ~ THEN GOTO 307 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw2h14") ~ THEN GOTO 311 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npchan") ~ THEN GOTO 315 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") OR(2) PartyHasItem("m#bchide") PartyHasItem("m#wskin") ~ THEN GOTO 331 IF ~PartyHasItem("C#AJSHLD") ~ THEN GOTO 365 IF ~PartyHasItem("C#AJ0012") ~ THEN GOTO 374 IF ~PartyHasItem("SWGHOST") ~ THEN GOTO 387 IF ~PartyHasItem("G#TFARMR") IfValidForPartyDialogue("G#Tyris") !StateCheck("G#Tyris",CD_STATE_NOTVALID) !Global("G#TF.CromSeenArmour","GLOBAL",1) ~ THEN DO ~SetGlobal("G#TF.CromSeenArmour","GLOBAL",1) ~ GOTO 394 IF ~PartyHasItem("G#TFARMR") IfValidForPartyDialogue("G#Tyris") !StateCheck("G#Tyris",CD_STATE_NOTVALID) Global("G#TF.CromSeenArmour","GLOBAL",1) ~ THEN GOTO 401 IF ~PartyHasItem("RING06") ~ THEN GOTO 413 IF ~PartyHasItem("CLCK01") ~ THEN GOTO 417 IF ~PartyHasItem("D1ILLITH") ~ THEN GOTO 421 IF ~PartyHasItem("SW1H26") ~ THEN GOTO 425 IF ~PartyHasItem("SW1H30") ~ THEN GOTO 429 IF ~PartyHasItem("SW1H38") ~ THEN GOTO 434 IF ~PartyHasItem("SW1H35") ~ THEN GOTO 438 IF ~PartyHasItem("AMUL14") ~ THEN GOTO 442 IF ~PartyHasItem("RR#BUC01") ~ THEN GOTO 455 IF ~PartyHasItem("RR#FDART") ~ THEN GOTO 460 IF ~PartyHasItem("RR#KEEP") ~ THEN GOTO 464 IF ~PartyHasItem("RR#WEAR") ~ THEN GOTO 468 IF ~PartyHasItem("RR#RWARD") ~ THEN GOTO 472 END IF ~~ THEN BEGIN 14 // from: 475.0 471.0 467.0 463.0 459.0 445.0 441.0 437.0 433.0 428.0 424.0 420.0 416.0 400.0 389.0 378.0 373.0 329.0 318.0 314.0 310.0 306.0 300.0 296.0 292.0 288.0 284.0 280.0 276.0 272.0 268.0 264.0 260.0 255.0 251.0 247.0 243.0 239.0 235.0 231.0 227.0 223.0 219.0 215.0 211.0 207.0 202.0 198.0 194.0 190.0 185.0 181.0 177.0 173.0 169.0 165.0 161.0 157.0 151.0 147.0 143.0 138.0 13.0 SAY #59708 /* ~Hmm. Nay... nay. Ye've nothing amongst yer goods that I could work with. If ye come across anything interesting later, friend, ye knows where to come, aye?~ */ IF ~~ THEN EXIT END IF ~~ THEN BEGIN 15 // from: 475.2 471.2 467.2 463.2 459.2 445.2 441.2 437.2 433.2 428.2 424.2 420.2 416.2 400.2 389.2 378.2 373.2 329.1 318.1 314.1 310.1 306.1 300.1 296.1 292.1 288.1 284.1 280.1 276.1 272.1 268.1 264.1 260.1 255.1 251.1 247.1 243.1 239.1 235.1 231.1 227.1 223.1 219.1 215.1 211.1 207.1 202.1 198.1 194.1 190.1 185.1 181.1 177.1 173.1 169.1 165.1 161.1 157.1 151.1 147.1 143.1 138.1 13.2 SAY #59709 /* ~Hmmmn... what's this? Some kind of scale from a beastie, aye?~ */ IF ~PartyHasItem("scaleb") ~ THEN GOTO 16 IF ~!PartyHasItem("scaleb") PartyHasItem("scaler") ~ THEN GOTO 17 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 18 END IF ~~ THEN BEGIN 16 // from: 15.0 SAY #59710 /* ~Aye, ye've collected the scales of a shadow dragon. By the Soul Forger, 'tis a grand sight. I can make a suit of armor from yon scales, if ye like.~ */ IF ~~ THEN REPLY #59712 /* ~What would that involve?~ */ DO ~SetGlobal("ForgeItem","GLOBAL",1) ~ GOTO 53 IF ~PartyHasItem("scaler") ~ THEN REPLY #59713 /* ~I don't think so. Do I have anything else useful?~ */ GOTO 17 IF ~!PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN REPLY #59714 /* ~I don't think so. Do I have anything else useful?~ */ GOTO 18 IF ~!PartyHasItem("scaler") !PartyHasItem("misc12") ~ THEN REPLY #59715 /* ~I don't think so. Do I have anything else useful?~ */ GOTO 19 END IF ~~ THEN BEGIN 17 // from: 53.1 16.1 15.1 SAY #59716 /* ~Ah! Scales from a red dragon, a beast of the Dread Flame. It shall make a grand suit of armor, if ye wish, me friend. Does that hold yer interest?~ */ IF ~~ THEN REPLY #59717 /* ~What's involved in that?~ */ DO ~SetGlobal("ForgeItem","GLOBAL",2) ~ GOTO 53 IF ~PartyHasItem("misc12") ~ THEN REPLY #59718 /* ~I don't think so. Do I have anything else useful?~ */ GOTO 18 IF ~!PartyHasItem("misc12") ~ THEN REPLY #59719 /* ~I don't think so. Do I have anything else useful?~ */ GOTO 19 END IF ~~ THEN BEGIN 18 // from: 53.3 53.2 17.1 16.2 15.2 SAY #59720 /* ~Hmmmn. Ye've the husk of an ankheg, I see. A comrade in Beregost taught me to make a fine suit of armor from the beastie. Would ye like to commission a suit?~ */ IF ~~ THEN REPLY #59721 /* ~What's involved in that?~ */ DO ~SetGlobal("ForgeItem","GLOBAL",3) ~ GOTO 53 IF ~~ THEN REPLY #59722 /* ~I don't think so. Do I have anything else of interest?~ */ GOTO 19 END IF ~~ THEN BEGIN 19 // from: 119.1 112.1 105.1 61.1 60.1 53.6 53.5 53.4 18.1 17.2 16.3 SAY #59723 /* ~I'll take another look for meself, here. Hmmmn...~ */ IF ~OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~!PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") OR(2) PartyHasItem("m#bchide") PartyHasItem("m#wskin") ~ THEN GOTO 331 IF ~!PartyHasItem("m#bchide") !PartyHasItem("m#wskin") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 52 END IF ~~ THEN BEGIN 20 // from: 475.3 471.3 467.3 463.3 459.3 445.3 441.3 437.3 433.3 428.3 424.3 420.3 416.3 400.3 389.3 378.3 373.3 329.2 318.2 314.2 310.2 306.2 300.2 296.2 292.2 288.2 284.2 280.2 276.2 272.2 268.2 264.2 260.2 255.2 251.2 247.2 243.2 239.2 235.2 231.2 227.2 223.2 219.2 215.2 211.2 207.2 202.2 198.2 194.2 190.2 185.2 181.2 177.2 173.2 169.2 165.2 161.2 157.2 151.2 147.2 143.2 138.2 19.0 13.3 SAY #59724 /* ~Ay, now, what have we here?~ */ IF ~PartyHasItem("scrlag") !PartyHasItem("hamm07") ~ THEN GOTO 21 IF ~!PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 24 IF ~PartyHasItem("scrlag") PartyHasItem("hamm07") OR(2) !PartyHasItem("brac06") !PartyHasItem("belt08") ~ THEN GOTO 25 IF ~PartyHasItem("scrlag") PartyHasItem("hamm07") PartyHasItem("brac06") PartyHasItem("belt08") ~ THEN GOTO 26 END IF ~~ THEN BEGIN 21 // from: 20.0 SAY #59725 /* ~Ye've a scroll with the true name of the thunderhammer, Crom Faeyr. Had ye a Hammer of Thunderbolts, Gauntlets of Ogre Power, and Girdle of Frost Giant Strength, I could combine 'em and forge it.~ */ IF ~~ THEN GOTO 22 END IF ~~ THEN BEGIN 22 // from: 25.0 24.0 21.0 SAY #59726 /* ~But ye don't, so I cannae help ye. If ye can collect the scroll and all three items later, keep them on hand. Crom Faeyr is worth the effort, my friend.~ */ IF ~~ THEN GOTO 23 END IF ~~ THEN BEGIN 23 // from: 120.1 113.1 106.1 83.1 55.1 27.1 22.0 SAY #59727 /* ~Let me see if ye've anything else in yer packs, now...~ */ IF ~OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~!PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") OR(2) PartyHasItem("m#bchide") PartyHasItem("m#wskin") ~ THEN GOTO 331 IF ~!PartyHasItem("m#bchide") !PartyHasItem("m#wskin") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 52 END IF ~~ THEN BEGIN 24 // from: 20.1 SAY #59728 /* ~I see ye've the Hammer of Thunderbolts? Had ye Gauntlets of Ogre Power, Girdle of Frost Giant strength, and scroll with the thunderhammer's True Name, I could forge a mighty weapon.~ */ IF ~~ THEN GOTO 22 END IF ~~ THEN BEGIN 25 // from: 20.2 SAY #59730 /* ~Ah, ye've a Hammer of Thunderbolts and a scroll with the true name of the thunderhammer, Crom Faeyr. If ye had Gauntlets of Ogre Power and Girdle of Frost Giant strength, I could forge the great weapon.~ */ IF ~~ THEN GOTO 22 END IF ~~ THEN BEGIN 26 // from: 20.3 SAY #59731 /* ~Hmm... Ye've a Hammer of Thunderbolts, Gauntlets of Ogre Power, Girdle of Frost Giant strength, and a scroll with the thunderhammer's true name...Crom Faeyr.~ */ IF ~~ THEN GOTO 27 END IF ~~ THEN BEGIN 27 // from: 26.0 SAY #59732 /* ~'Tis a collection that would widen the eyes of the Soul Forger, himself. I could create the Crom Faeyr for ye, friend... if ye've the interest, of course.~ */ IF ~~ THEN REPLY #59733 /* ~What would that involve?~ */ DO ~SetGlobal("ForgeItem","GLOBAL",4) ~ GOTO 55 IF ~~ THEN REPLY #59734 /* ~No, I don't think so. Do I have anything else of interest?~ */ GOTO 23 END IF ~~ THEN BEGIN 28 // from: 475.4 471.4 467.4 463.4 459.4 445.4 441.4 437.4 433.4 428.4 424.4 420.4 416.4 400.4 389.4 378.4 373.4 329.3 318.3 314.3 310.3 306.3 300.3 296.3 292.3 288.3 284.3 280.3 276.3 272.3 268.3 264.3 260.3 255.3 251.3 247.3 243.3 239.3 235.3 231.3 227.3 223.3 219.3 215.3 211.3 207.3 202.3 198.3 194.3 190.3 185.3 181.3 177.3 173.3 169.3 165.3 161.3 157.3 151.3 147.3 143.3 138.3 23.0 19.1 13.4 SAY #59735 /* ~Eh? Ye've part of some sword, here, is it? Let me see...~ */ IF ~PartyHasItem("sw1h54a") OR(2) !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") ~ THEN GOTO 29 IF ~PartyHasItem("sw1h54b") OR(2) !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54c") ~ THEN GOTO 30 IF ~PartyHasItem("sw1h54c") OR(2) !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54a") ~ THEN GOTO 31 IF ~PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 32 END IF ~~ THEN BEGIN 29 // from: 28.0 SAY #59736 /* ~Well, ye've the hilt of a sword, here, but I would need both the blade and the pommel gem in order to forge it into one piece. A pity.~ */ IF ~~ THEN GOTO 33 END IF ~~ THEN BEGIN 30 // from: 28.1 SAY #59737 /* ~Well, ye've the blade of a sword, here, indeed. But I would need both it's pommel gem and the sword's hilt in order to forge it into one piece for ye. A pity.~ */ IF ~~ THEN GOTO 33 END IF ~~ THEN BEGIN 31 // from: 28.2 SAY #59738 /* ~Hmmmn. A pretty enough pommel gem, but without the blade or the hilt of the weapon, I cannae forge it into one piece for ye. A pity.~ */ IF ~~ THEN GOTO 33 END IF ~~ THEN BEGIN 32 // from: 28.3 SAY #59739 /* ~Hmmmn... I see. Ye've a hilt and a blade, here, for a longsword. And a pommel gem with much of its power. I could forge it all into one mighty sword for ye.~ */ IF ~~ THEN REPLY #59740 /* ~What would be involved in that?~ */ DO ~SetGlobal("ForgeItem","GLOBAL",5) ~ GOTO 54 IF ~~ THEN REPLY #59741 /* ~No, I'm not interested in that. Anything else of use?~ */ GOTO 33 END IF ~~ THEN BEGIN 33 // from: 54.1 32.1 31.0 30.0 29.0 SAY #59742 /* ~Well, what else does ye have in yer packs, then? Hmmmn...~ */ IF ~OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~!PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") OR(2) PartyHasItem("m#bchide") PartyHasItem("m#wskin") ~ THEN GOTO 331 IF ~!PartyHasItem("m#bchide") !PartyHasItem("m#wskin") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 52 END IF ~~ THEN BEGIN 34 // from: 475.5 471.5 467.5 463.5 459.5 445.5 441.5 437.5 433.5 428.5 424.5 420.5 416.5 400.5 389.5 378.5 373.5 329.4 318.4 314.4 310.4 306.4 300.4 296.4 292.4 288.4 284.4 280.4 276.4 272.4 268.4 264.4 260.4 255.4 251.4 247.4 243.4 239.4 235.4 231.4 227.4 223.4 219.4 215.4 211.4 207.4 202.4 198.4 194.4 190.4 185.4 181.4 177.4 173.4 169.4 165.4 161.4 157.4 151.4 147.4 143.4 138.4 33.0 23.1 19.2 13.5 SAY #59743 /* ~Hmmmn. What's this, then? Part of a bow? Looks like Gesen's work...~ */ IF ~PartyHasItem("bow19a") !PartyHasItem("bow19b") ~ THEN GOTO 35 IF ~!PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 36 IF ~PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 37 END IF ~~ THEN BEGIN 35 // from: 34.0 SAY #59744 /* ~Ach, ye've a shaft that's been created by the great bowyer, Gesen, but ye haven't Gesen's proper string. Find that and I can re-forge the bow for ye.~ */ IF ~~ THEN GOTO 38 END IF ~~ THEN BEGIN 36 // from: 34.1 SAY #59745 /* ~Ach, ye've a proper string made by the great bowyer Gesen. But not his shaft. If ye find the shaft, bring it to me and I'll re-forge the bow entire for ye.~ */ IF ~~ THEN GOTO 38 END IF ~~ THEN BEGIN 37 // from: 34.2 SAY #59746 /* ~Hmmmn. Aye, 'tis Gesen's work, indeed. A string and a shaft both. I could remake one of the great bowyer's short bows for ye. 'Tis a truly powerful weapon.~ */ IF ~~ THEN REPLY #59747 /* ~What's involved in that?~ */ DO ~SetGlobal("ForgeItem","GLOBAL",6) ~ GOTO 54 IF ~~ THEN REPLY #59748 /* ~No, I don't think so. Do I have anything else of use?~ */ GOTO 38 END IF ~~ THEN BEGIN 38 // from: 54.2 37.1 36.0 35.0 SAY #59749 /* ~I'll keep looking, here, me friend. Hmmmn....~ */ IF ~OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~!PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") OR(2) PartyHasItem("m#bchide") PartyHasItem("m#wskin") ~ THEN GOTO 331 IF ~!PartyHasItem("m#bchide") !PartyHasItem("m#wskin") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 52 END IF ~~ THEN BEGIN 39 // from: 475.6 471.6 467.6 463.6 459.6 445.6 441.6 437.6 433.6 428.6 424.6 420.6 416.6 400.6 389.6 378.6 373.6 329.5 318.5 314.5 310.5 306.5 300.5 296.5 292.5 288.5 284.5 280.5 276.5 272.5 268.5 264.5 260.5 255.5 251.5 247.5 243.5 239.5 235.5 231.5 227.5 223.5 219.5 215.5 211.5 207.5 202.5 198.5 194.5 190.5 185.5 181.5 177.5 173.5 169.5 165.5 161.5 157.5 151.5 147.5 143.5 138.5 38.0 33.1 23.2 19.3 13.6 SAY #59750 /* ~Hmmm... hmmm... aye. Aye, now, this looks interesting...~ */ IF ~PartyHasItem("halb09a") !PartyHasItem("halb09b") ~ THEN GOTO 40 IF ~!PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 41 IF ~PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 42 END IF ~~ THEN BEGIN 40 // from: 39.0 SAY #59751 /* ~Ye've the shaft of what was once a powerful halberd. If ye finds the blade for it, I could re-forge the old weapon without much fuss.~ */ IF ~~ THEN GOTO 43 END IF ~~ THEN BEGIN 41 // from: 39.1 SAY #59752 /* ~Ye've a blade, here, fer a mighty halberd. It seems t' have power of water... odd. If ye can find the accompanying shaft I can forge it together for ye. ~ */ IF ~~ THEN GOTO 43 END IF ~~ THEN BEGIN 42 // from: 39.2 SAY #59753 /* ~Hmmm... ye've the shaft and blade of a halberd. Power of water in its elemental magic. Most interesting. If ye like, I could try to re-forge it for ye.~ */ IF ~~ THEN REPLY #59754 /* ~What would be involved in that?~ */ DO ~SetGlobal("ForgeItem","GLOBAL",7) ~ GOTO 54 IF ~~ THEN REPLY #59755 /* ~No, I'm not interested. Anything else of use?~ */ GOTO 43 END IF ~~ THEN BEGIN 43 // from: 54.3 42.1 41.0 40.0 SAY #59756 /* ~Quite a mess ye have, here. Traveling for some time eh? Hmmmn...~ */ IF ~OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~!PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") OR(2) PartyHasItem("m#bchide") PartyHasItem("m#wskin") ~ THEN GOTO 331 IF ~!PartyHasItem("m#bchide") !PartyHasItem("m#wskin") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 52 END IF ~~ THEN BEGIN 44 // from: 475.7 471.7 467.7 463.7 459.7 445.7 441.7 437.7 433.7 428.7 424.7 420.7 416.7 400.7 389.7 378.7 373.7 329.6 318.6 314.6 310.6 306.6 300.6 296.6 292.6 288.6 284.6 280.6 276.6 272.6 268.6 264.6 260.6 255.6 251.6 247.6 243.6 239.6 235.6 231.6 227.6 223.6 219.6 215.6 211.6 207.6 202.6 198.6 194.6 190.6 185.6 181.6 177.6 173.6 169.6 165.6 161.6 157.6 151.6 147.6 143.6 138.6 43.0 38.1 33.2 23.3 19.4 13.7 SAY #59757 /* ~Ey? What's this? Gith craftsmanship? Haven't seen this in o'er a century...~ */ IF ~PartyHasItem("misc8u") !PartyHasItem("sw2h15a") ~ THEN GOTO 45 IF ~!PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 46 IF ~PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 47 END IF ~~ THEN BEGIN 45 // from: 44.0 SAY #59758 /* ~Welll... it seems ye've the blade of a Silver Sword, here. Not much good without the hilt, though. Best be wary... the Gith won't be pleased if they catch ye with this. ~ */ IF ~~ THEN GOTO 48 END IF ~~ THEN BEGIN 46 // from: 44.1 SAY #59759 /* ~Well... ye've the hilt of a Silver Sword, but without the blade to match, I cannae help ye. Best be wary, too... the Gith won't be pleased if they catch ye with this.~ */ IF ~~ THEN GOTO 48 END IF ~~ THEN BEGIN 47 // from: 44.2 SAY #59760 /* ~Aye. Ye've the hilt and blade of a vorpal Silver Sword. If ye're willing to risk the wrath of the Gith, I'm willing to put it back together for ye. ~ */ IF ~~ THEN REPLY #59761 /* ~What would be involved with that?~ */ DO ~SetGlobal("ForgeItem","GLOBAL",8) ~ GOTO 54 IF ~~ THEN REPLY #59762 /* ~I don't think so. Do I have anything else of use?~ */ GOTO 48 END IF ~~ THEN BEGIN 48 // from: 54.4 47.1 46.0 45.0 SAY #59763 /* ~I'll keep looking. Hmmm.... I see...~ */ IF ~PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~!PartyHasItem("misc5k") OR(2) PartyHasItem("m#bchide") PartyHasItem("m#wskin") ~ THEN GOTO 331 IF ~!PartyHasItem("m#bchide") !PartyHasItem("m#wskin") !PartyHasItem("misc5k") ~ THEN GOTO 52 END IF ~~ THEN BEGIN 49 // from: 475.8 471.8 467.8 463.8 459.8 445.8 441.8 437.8 433.8 428.8 424.8 420.8 416.8 400.8 389.8 378.8 373.8 329.7 318.7 314.7 310.7 306.7 300.7 296.7 292.7 288.7 284.7 280.7 276.7 272.7 268.7 264.7 260.7 255.7 251.7 247.7 243.7 239.7 235.7 231.7 227.7 223.7 219.7 215.7 211.7 207.7 202.7 198.7 194.7 190.7 185.7 181.7 177.7 173.7 169.7 165.7 161.7 157.7 151.7 147.7 143.7 138.7 48.0 43.1 38.2 33.3 23.4 19.5 13.8 SAY #59764 /* ~Ay, now... this could be something, here. Some kind of metal, eh? Let me see...~ */ IF ~!PartyHasItem("blun12") ~ THEN GOTO 50 IF ~PartyHasItem("blun12") ~ THEN GOTO 51 END IF ~~ THEN BEGIN 50 // from: 49.0 SAY #59765 /* ~It be illithium, aye? A rare metal, indeed. If ye ever get ahold of a Mace of Disruption, a coating of illithium would improve it vastly. ~ */ IF ~~ THEN GOTO 52 IF ~OR(2) PartyHasItem("m#bchide") PartyHasItem("m#wskin") ~ THEN GOTO 331 END IF ~~ THEN BEGIN 51 // from: 49.1 SAY #59766 /* ~Ye've illithium there, aye? And a Mace of Disruption, as well. I could apply a coating to yer mace and improve it greatly, giving ye more protection from the undead. ~ */ IF ~~ THEN REPLY #59767 /* ~What's involved in that?~ */ DO ~SetGlobal("ForgeItem","GLOBAL",9) ~ GOTO 54 IF ~OR(2) PartyHasItem("m#bchide") PartyHasItem("m#wskin") ~ THEN REPLY #193417 /* ~No, I don't think so. Anything else of use?~ */ GOTO 341 IF ~!PartyHasItem("m#bchide") !PartyHasItem("m#wskin") ~ THEN REPLY #59768 /* ~No, I don't think so. Anything else of use?~ */ GOTO 52 END IF ~~ THEN BEGIN 52 // from: 54.6 51.2 50.0 48.2 43.3 38.4 33.5 23.6 19.7 SAY #59769 /* ~Nay... nay, I see nothing else here that could be of use in the forge. Perhaps another time, then, me friend.~ */ IF ~~ THEN EXIT END IF ~~ THEN BEGIN 53 // from: 18.0 17.0 16.0 SAY #59771 /* ~Two things, me friend. It will cost ye 5,000 gp for the work, no less, and without an apprentice, ye'll have to stay here a full day and help me run the forge.~ */ IF ~PartyGoldGT(4999) ~ THEN REPLY #59775 /* ~That sounds fine. Let's do it.~ */ DO ~TakePartyGold(5000) DestroyGold(5000) ~ GOTO 56 IF ~Global("ForgeItem","GLOBAL",1) PartyHasItem("scaler") ~ THEN REPLY #59777 /* ~No, I don't think so. Do I have anything else useful?~ */ DO ~SetGlobal("ForgeItem","GLOBAL",0) ~ GOTO 17 IF ~Global("ForgeItem","GLOBAL",1) !PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN REPLY #59779 /* ~No, I don't think so. Do I have anything else useful?~ */ DO ~SetGlobal("ForgeItem","GLOBAL",0) ~ GOTO 18 IF ~Global("ForgeItem","GLOBAL",2) PartyHasItem("misc12") ~ THEN REPLY #59780 /* ~No, I don't think so. Do I have anything else useful?~ */ DO ~SetGlobal("ForgeItem","GLOBAL",0) ~ GOTO 18 IF ~Global("ForgeItem","GLOBAL",3) ~ THEN REPLY #59781 /* ~No, I don't think so. Do I have anything else useful?~ */ DO ~SetGlobal("ForgeItem","GLOBAL",0) ~ GOTO 19 IF ~Global("ForgeItem","GLOBAL",1) !PartyHasItem("scaler") !PartyHasItem("misc12") ~ THEN REPLY #59782 /* ~No, I don't think so. Do I have anything else useful?~ */ DO ~SetGlobal("ForgeItem","GLOBAL",0) ~ GOTO 19 IF ~Global("ForgeItem","GLOBAL",2) !PartyHasItem("misc12") ~ THEN REPLY #59783 /* ~No, I don't think so. Do I have anything else useful?~ */ DO ~SetGlobal("ForgeItem","GLOBAL",0) ~ GOTO 19 IF ~~ THEN REPLY #59778 /* ~No, I don't think so. I think I'll be going, now.~ */ DO ~SetGlobal("ForgeItem","GLOBAL",0) ~ GOTO 12 END IF ~~ THEN BEGIN 54 // from: 328.0 51.0 47.0 42.0 37.0 32.0 SAY #59784 /* ~Two things, me friend. It will cost ye 7,500 gp for the work, no less, and without an apprentice, ye'll have to stay here a full day and help me run the forge.~ */ IF ~PartyGoldGT(7499) ~ THEN REPLY #59785 /* ~That sounds fine. Let's do it.~ */ DO ~TakePartyGold(7500) DestroyGold(7500) ~ GOTO 56 IF ~Global("ForgeItem","GLOBAL",5) ~ THEN REPLY #59786 /* ~No, I don't think so. Do I have anything else useful?~ */ DO ~SetGlobal("ForgeItem","GLOBAL",0) ~ GOTO 33 IF ~Global("ForgeItem","GLOBAL",6) ~ THEN REPLY #59787 /* ~No, I don't think so. Do I have anything else useful?~ */ DO ~SetGlobal("ForgeItem","GLOBAL",0) ~ GOTO 38 IF ~Global("ForgeItem","GLOBAL",7) ~ THEN REPLY #59788 /* ~No, I don't think so. Do I have anything else useful?~ */ DO ~SetGlobal("ForgeItem","GLOBAL",0) ~ GOTO 43 IF ~Global("ForgeItem","GLOBAL",8) ~ THEN REPLY #59789 /* ~No, I don't think so. Do I have anything else useful?~ */ DO ~SetGlobal("ForgeItem","GLOBAL",0) ~ GOTO 48 IF ~Global("ForgeItem","GLOBAL",9) OR(2) PartyHasItem("m#bchide") PartyHasItem("m#wskin") ~ THEN REPLY #59794 /* ~No, I don't think so. Do I have anything else useful?~ */ DO ~SetGlobal("ForgeItem","GLOBAL",0) ~ GOTO 341 IF ~!PartyHasItem("m#bchide") !PartyHasItem("m#wskin") Global("ForgeItem","GLOBAL",9) ~ THEN REPLY #59790 /* ~No, I don't think so. Do I have anything else useful?~ */ DO ~SetGlobal("ForgeItem","GLOBAL",0) ~ GOTO 52 IF ~~ THEN REPLY #59791 /* ~No, I don't think so. I think I'll be going, now.~ */ DO ~SetGlobal("ForgeItem","GLOBAL",0) ~ GOTO 12 IF ~Global("M#ForgeItem","GLOBAL",1) ~ THEN REPLY #193418 /* ~No, I don't think so. Do I have anything else useful?~ */ DO ~SetGlobal("M#ForgeItem","GLOBAL",0) ~ GOTO 329 END IF ~~ THEN BEGIN 55 // from: 27.0 SAY #59792 /* ~Two things, me friend. It will cost ye 10,000 gp for the work, no less, and without an apprentice, ye'll have to stay here a full day and help me run the forge.~ */ IF ~PartyGoldGT(9999) ~ THEN REPLY #59793 /* ~That sounds fine. Let's do it.~ */ DO ~TakePartyGold(10000) DestroyGold(10000) ~ GOTO 56 IF ~Global("ForgeItem","GLOBAL",4) ~ THEN REPLY #59794 /* ~No, I don't think so. Do I have anything else useful?~ */ DO ~SetGlobal("ForgeItem","GLOBAL",0) ~ GOTO 23 IF ~~ THEN REPLY #59795 /* ~No, I don't think so. I think I'll be going, now.~ */ DO ~SetGlobal("ForgeItem","GLOBAL",0) ~ GOTO 12 END IF ~~ THEN BEGIN 56 // from: 474.1 470.1 466.1 462.1 457.1 444.1 440.1 436.1 432.1 427.1 423.1 419.1 415.1 399.0 388.0 377.0 372.0 371.0 317.1 313.1 309.1 305.1 304.1 303.1 299.1 295.1 291.1 287.1 283.1 279.1 275.1 271.1 267.1 263.1 259.1 258.1 254.1 250.1 246.1 242.1 238.1 234.1 230.1 226.1 222.1 218.1 214.1 210.1 206.1 205.1 201.1 197.1 193.1 189.1 188.1 184.1 180.1 176.1 172.1 168.1 164.1 160.1 156.1 155.1 154.1 150.1 146.1 141.1 136.0 126.0 61.0 55.0 54.0 53.0 SAY #59796 /* ~As ye wish. Fer such a commission, we can start on it right away. No sense in wasting time, then... it be best if we just get to it.~ */ IF ~~ THEN DO ~StartCutSceneMode() StartCutScene("cromwell") ~ EXIT END IF WEIGHT #4 /* Triggers after states #: 142 349 458 even though they appear after this state */ ~GlobalGT("ForgeItem","GLOBAL",0) ~ THEN BEGIN 57 // from: SAY #59797 /* ~Well, there ye go, me friend. Use it well. And if ye comes across anything else of interest, ye knows where to bring it, aye?~ */ IF ~~ THEN DO ~SetGlobal("ForgeItem","GLOBAL",0) ~ EXIT END IF WEIGHT #5 /* Triggers after states #: 142 349 458 even though they appear after this state */ ~Global("M#ForgeItem","GLOBAL",0) !Global("CbCromwellForgesCrown","AR0334",1) !Global("CbCromwellForgesMoonblade","AR0334",1) !Global("CbCromwellForgesMoonblade","AR0334",3) !Global("CbCromwellForgesSpellsung","AR0334",3) Global("ForgeItem","GLOBAL",0) ~ THEN BEGIN 58 // from: SAY #59798 /* ~A good to ye, me friend. Good to see ye back in me forge, it is. Be there something that ye need?~ */ IF ~GlobalGT("CbMalteseArtifact","GLOBAL",4) !GlobalGT("CbCromwellDestroysCrown","AR0334",0) ~ THEN REPLY #99961 /* ~Actually, I understand that you can forge some pretty nice weapons. I was wondering if you could do that for all silver- or metal-work, or just weapons.~ */ GOTO 62 IF ~GlobalGT("CbMalteseArtifact","GLOBAL",4) PartyHasItem("CBMALR6a") Global("SPRITE_IS_DEADCBMALR1","GLOBAL",1) ~ THEN REPLY #99962 /* ~I need you to do something, good Cromwell. I need this artifact destroyed. It is of great evil, and cannot be found. Take it; take it and destroy it.~ */ GOTO 74 IF ~Global("TalkedToCromwell","LOCALS",0) ~ THEN REPLY #59803 /* ~What sorts of things do you forge here?~ */ GOTO 8 IF ~Global("TalkedToCromwell","LOCALS",0) ~ THEN REPLY #59799 /* ~What do you have for sale, here?~ */ GOTO 2 IF ~Global("TalkedToCromwell","LOCALS",1) ~ THEN REPLY #59800 /* ~What sorts of things would you need in order to make something?~ */ GOTO 11 IF ~Global("TalkedToCromwell","LOCALS",1) ~ THEN REPLY #59801 /* ~Do I have anything you could forge into an item?~ */ GOTO 13 IF ~~ THEN REPLY #59802 /* ~No, I don't think so.~ */ GOTO 12 IF ~PartyHasItem("CLFTFG") ~ THEN REPLY #177558 /* ~I have a favor to ask regarding this troll finger.~ */ GOTO 123 IF ~PartyHasItem("KovaDag2") XPGT("Kova",999999) ~ THEN REPLY #202688 /* ~Can you improve Navaeren?~ */ GOTO 345 IF ~PartyHasItem("KovaArm1") XPGT("Kova",999999) ~ THEN REPLY #202689 /* ~Is there a way to enhance Haeloven?~ */ GOTO 346 IF ~PartyHasItem("KiyoBow1") XPGT("Kiyone",999999) ~ THEN REPLY #202690 /* ~Can you improve Eye of the Sentinel?~ */ GOTO 347 IF ~PartyHasItem("KiyoArm1") XPGT("Kiyone",999999) ~ THEN REPLY #202691 /* ~Is there a way to enhance Verdant Vigil?~ */ GOTO 348 IF ~IfValidForPartyDialogue("Yoshimo") PartyHasItem("Npsw02") Global("YoshiKnowCrom","GLOBAL",1) ~ THEN REPLY #202692 /* ~Might you be able to alter Yoshimo's katana to be as versatile as Kova's weapon?~ */ GOTO 342 IF ~IfValidForPartyDialogue("Yoshimo") InMyArea("Yoshimo") Global("BKovaYoshi","GLOBAL",3) IfValidForPartyDialogue("Kova") InMyArea("Kova") Global("YoshiKnowCrom","GLOBAL",0) ~ THEN EXTERN ~YOSHJ~ 273 IF ~Global("wsmith01-58","GLOBAL",0) IfValidForPartyDialogue("Kova") InMyArea("Kova") Global("GreetCrom","GLOBAL",0) ~ THEN DO ~SetGlobal("wsmith01-58","GLOBAL",1) ~ GOTO 362 IF ~PartyHasItem("MDSClue2") ~ THEN REPLY #296110 /* ~Erm.... do you have an item of mine, that a er, crazy white bearded dwarf left?~ */ GOTO 403 IF ~Global("G3BigRobActivated","GLOBAL",3) ~ THEN REPLY #336197 /* ~Do you have a commission waiting for Robukin Rockskull?~ */ DO ~SetGlobal("G3BigRobActivated","GLOBAL",4) ~ GOTO 449 IF ~PartyHasItem("G3BRSCRL") ~ THEN REPLY #336198 /* ~I've brought the scroll from Robukin, do you have his oil? ~ */ GOTO 454 END IF ~~ THEN BEGIN 59 // from: 475.9 471.9 467.9 463.9 459.9 445.9 441.9 437.9 433.9 428.9 424.9 420.9 416.9 400.9 389.9 378.9 373.9 329.8 318.8 314.8 310.8 306.8 300.8 296.8 292.8 288.8 284.8 280.8 276.8 272.8 268.8 264.8 260.8 255.8 251.8 247.8 243.8 239.8 235.8 231.8 227.8 223.8 219.8 215.8 211.8 207.8 202.8 198.8 194.8 190.8 185.8 181.8 177.8 173.8 169.8 165.8 161.8 157.8 151.8 147.8 143.8 138.8 13.9 SAY #59709 /* ~Hmmmn... what's this? Some kind of scale from a beastie, aye?~ */ IF ~~ THEN GOTO 60 END IF ~~ THEN BEGIN 60 // from: 59.0 SAY #99963 /* ~Aye, ye've collected the scales of a blue dragon. By the Soul Forger, 'tis must have been hard won. I can make a suit of armor from yon scales, if ye like.~ */ IF ~~ THEN REPLY #59733 /* ~What would that involve?~ */ DO ~SetGlobal("ForgeItem","GLOBAL",10) ~ GOTO 61 IF ~~ THEN REPLY #59719 /* ~I don't think so. Do I have anything else useful?~ */ GOTO 19 END IF ~~ THEN BEGIN 61 // from: 60.0 SAY #99964 /* ~Two things, me friend. It will cost ye 8,000 gp for the work, no less, and without an apprentice, ye'll have to stay here two days and heat the forge.~ */ IF ~PartyGoldGT(7999) ~ THEN REPLY #59793 /* ~That sounds fine. Let's do it.~ */ DO ~TakePartyGold(8000) DestroyGold(8000) ~ GOTO 56 IF ~PartyGoldLT(8000) ~ THEN REPLY #59794 /* ~No, I don't think so. Do I have anything else useful?~ */ DO ~SetGlobal("ForgeItem","GLOBAL",0) ~ GOTO 19 IF ~~ THEN REPLY #59795 /* ~No, I don't think so. I think I'll be going, now.~ */ DO ~SetGlobal("ForgeItem","GLOBAL",0) ~ GOTO 12 END IF ~~ THEN BEGIN 62 // from: 364.0 361.0 58.0 6.0 5.0 4.0 3.0 2.0 1.0 0.0 SAY #99965 /* ~Aye, me friend, that I can do. Me fadder train'd me in the art, and I can forge nearly anything, from spoons to statues.~ */ IF ~~ THEN GOTO 63 END IF ~~ THEN BEGIN 63 // from: 62.0 SAY #99966 /* ~Sounds to me that you be wantin' somethin' pretty. Aye, you got plans, I'd wager. What be you wantin' to make?~ */ IF ~~ THEN REPLY #99967 /* ~A crown. I need a crown that looks real close to a magical item. But I don't know what it looks like. It's called a Crown of Horns, and it's pretty rare.~ */ GOTO 64 END IF ~~ THEN BEGIN 64 // from: 63.0 SAY #99968 /* ~If you don't be knowin' what the durned thing looks like, how by Clangeddin's beard do you be expectin' me to make it?~ */ IF ~~ THEN REPLY #99969 /* ~I don't know, Cromwell. But it's real important. There's a mage that has the original, and he's planning to do something dangerous. I need to stop him.~ */ GOTO 65 END IF ~~ THEN BEGIN 65 // from: 64.0 SAY #99970 /* ~A problem we be havin', then. You gots any other ideas about how to be makin' it?~ */ IF ~~ THEN REPLY #99971 /* ~All I know is that there was a mage who gave me a recipe. I've got to find the parts, and then it's supposed to be enchanted. Can you do it if I find the parts?~ */ GOTO 66 IF ~PartyHasItem("MISC42") PartyHasItem("SCRL6M") PartyHasItem("POTN34") OR(4) PartyHasItem("AMUL17") PartyHasItem("CHALCY3") PartyHasItem("IPSION") PartyHasItem("RING14") ~ THEN REPLY #99972 /* ~Actually, I was told what parts would be needed in order to make a fake, and I have them here. Do you think you could make it from these?~ */ GOTO 68 END IF ~~ THEN BEGIN 66 // from: 65.0 SAY #99973 /* ~I don't be knowin', me friend. Sounds important, and I'd be doin' my best for ya, but without seein' what it was I'm supposed to forge, it'd be unlikely that anyone be fooled by the copy.~ */ IF ~~ THEN REPLY #99974 /* ~As long as you'd do your best, Cromwell, that's all that's important.~ */ GOTO 67 END IF ~~ THEN BEGIN 67 // from: 66.0 SAY #99975 /* ~As you be sayin'. Mind the mess on yer way out, .~ */ IF ~~ THEN EXIT END IF ~~ THEN BEGIN 68 // from: 65.1 SAY #99976 /* ~Don't be knowin', . We can try, but it don't mean nothin' less what you be wantin' fools this mage ye speak about.~ */ IF ~~ THEN REPLY #99977 /* ~All right, why don't you take this stuff, and let's try it and see.~ */ GOTO 71 IF ~~ THEN REPLY #99978 /* ~Well, I don't know if it'll work, and I don't want to waste these. Let me see if I can find some more information for you about the real Crown of Horns.~ */ GOTO 69 END IF ~~ THEN BEGIN 69 // from: 68.1 SAY #99979 /* ~That prolly be best, . Maybe the real one or a paintin' or somethin'. I's got to know what it looks like to forge it to fool anyone.~ */ IF ~~ THEN GOTO 70 END IF ~~ THEN BEGIN 70 // from: 69.0 SAY #99980 /* ~As always, , mind the mess on yer way out.~ */ IF ~~ THEN EXIT END IF ~~ THEN BEGIN 71 // from: 68.0 SAY #99981 /* ~If you be sure about this, I'll try it. Don't mean nothing like I be tellin' you, but I'll be doin' my best for you.~ */ IF ~~ THEN DO ~SetGlobal("CbCromwellForgesCrown","AR0334",1) StartCutSceneMode() StartCutScene("CROMWELL") ~ EXIT END IF WEIGHT #6 /* Triggers after states #: 142 349 458 even though they appear after this state */ ~Global("CbCromwellForgesCrown","AR0334",1) PartyHasItem("CBMALDUP") ~ THEN BEGIN 72 // from: SAY #99982 /* ~Looks like what ever it was ye had worked. Seems like this here crown would serve to do whatev'r it is you be planning to do with this mage.~ */ IF ~~ THEN REPLY #99983 /* ~Thanks, Cromwell. I hope that he thinks this is the real one.~ */ DO ~SetGlobal("CbCromwellForgesCrown","AR0334",2) AddJournalEntry(95871,QUEST) EraseJournalEntry(95870) EraseJournalEntry(95869) EraseJournalEntry(95872) EraseJournalEntry(95873) EraseJournalEntry(95868) EraseJournalEntry(95874) EraseJournalEntry(95875) ~ EXIT END IF WEIGHT #7 /* Triggers after states #: 142 349 458 even though they appear after this state */ ~Global("CbCromwellForgesCrown","AR0334",1) !PartyHasItem("CBMALDUP") ~ THEN BEGIN 73 // from: SAY #99984 /* ~Looks like what ever it was ye had didn't work. Seems like I'd be either needin' more of those parts, or a look at the real one. If ye want me to try it again, bring me the parts and I'll take another go at it.~ */ IF ~~ THEN REPLY #99985 /* ~Thanks anyway, Cromwell. I don't know what I'll do about it.~ */ DO ~SetGlobal("CbCromwellForgesCrown","AR0334",0) AddJournalEntry(95870,QUEST) ~ EXIT END IF ~~ THEN BEGIN 74 // from: 364.1 361.1 58.1 6.1 5.1 4.1 3.1 2.1 1.1 0.1 SAY #99986 /* ~I normally be creatin' works of art: silver and iron and steel, not be destroyin' things. But if ye say it need be destroyed, I can do that for ye, friend. Here, let me see it.~ */ IF ~~ THEN DO ~TakePartyItem("CBMALR6a") AddJournalEntry(96108,QUEST_DONE) EraseJournalEntry(95867) EraseJournalEntry(95871) EraseJournalEntry(95870) EraseJournalEntry(95869) EraseJournalEntry(95872) EraseJournalEntry(95873) EraseJournalEntry(95868) EraseJournalEntry(95874) EraseJournalEntry(95875) SetGlobal("CbCromwellDestroysCrown","AR0334",1) ~ EXIT END IF ~~ THEN BEGIN 75 // from: 475.10 471.10 467.10 463.10 459.10 445.10 441.10 437.10 433.10 428.10 424.10 420.10 416.10 400.10 389.10 378.10 373.10 329.9 318.9 314.9 310.9 306.9 300.9 296.9 292.9 288.9 284.9 280.9 276.9 272.9 268.9 264.9 260.9 255.9 251.9 247.9 243.9 239.9 235.9 231.9 227.9 223.9 219.9 215.9 211.9 207.9 202.9 198.9 194.9 190.9 185.9 181.9 177.9 173.9 169.9 165.9 161.9 157.9 151.9 147.9 143.9 138.9 13.10 SAY #99987 /* ~Look't here. A hilt. Darned thing is broken. How'd you be doing this?~ */ IF ~~ THEN GOTO 76 END IF ~~ THEN BEGIN 76 // from: 75.0 SAY #99988 /* ~What's this thing for?~ */ IF ~~ THEN REPLY #99989 /* ~Cromwell, it's part of a sword. A Moonblade, in fact. I want to rebuild it.~ */ GOTO 77 END IF ~~ THEN BEGIN 77 // from: 76.0 SAY #99990 /* ~A Moonblade, you say? Wonders never cease! I ain't seen one of these in a long time. How'd you break it?~ */ IF ~~ THEN REPLY #99991 /* ~I didn't break it. I have to fix it, but don't know what I need to fix it. Do you?~ */ GOTO 78 END IF ~~ THEN BEGIN 78 // from: 77.0 SAY #99992 /* ~There be only one thing that can be used to forge Moonblades. Persephonium. You be needin' to get some from the mines up in Eaerlann. Ascalhorn used to be minin' persephonium, but the damned demons put a stop to that.~ */ IF ~~ THEN GOTO 79 END IF ~~ THEN BEGIN 79 // from: 78.0 SAY #99993 /* ~You be bringing me some persephonium, sure as Clangeddin's hammer do I be able to forge the blade. Mayhaps the hilt will have also retained the magics, and you'd have yourself a bonnie Elven blade indeed.~ */ IF ~~ THEN REPLY #99994 /* ~All right, Cromwell. I'll try and find some persephonium. Thanks.~ */ GOTO 4 END IF ~~ THEN BEGIN 80 // from: 475.11 471.11 467.11 463.11 459.11 445.11 441.11 437.11 433.11 428.11 424.11 420.11 416.11 400.11 389.11 378.11 373.11 329.10 318.10 314.10 310.10 306.10 300.10 296.10 292.10 288.10 284.10 280.10 276.10 272.10 268.10 264.10 260.10 255.10 251.10 247.10 243.10 239.10 235.10 231.10 227.10 223.10 219.10 215.10 211.10 207.10 202.10 198.10 194.10 190.10 185.10 181.10 177.10 173.10 169.10 165.10 161.10 157.10 151.10 147.10 143.10 138.10 13.11 SAY #99995 /* ~Look't here. You got yourself a hilt. Broken it may be, but sure as my beard is long, I know what it is and how to be fixin' it. You even got some metal to reforge this!~ */ IF ~~ THEN GOTO 81 END IF ~~ THEN BEGIN 81 // from: 80.0 SAY #99996 /* ~This is the hilt of a Moonblade, , a powerful Elven blade. Ain't never seen one that was broken, but you be having persephonium, the only metal that can be used to forge the blades.~ */ IF ~~ THEN GOTO 82 END IF ~~ THEN BEGIN 82 // from: 81.0 SAY #99997 /* ~Don't know if you were up in Eaerlann or Everlund, and I'm bettin' my hammer on the fact you weren't on Evermeet, but you got the ore somehows.~ */ IF ~~ THEN GOTO 83 END IF ~~ THEN BEGIN 83 // from: 82.0 SAY #99998 /* ~Now, do you be wanting to reforge this blade?~ */ IF ~~ THEN REPLY #99999 /* ~Owen~ */ GOTO 84 IF ~~ THEN REPLY #100000 /* ~Annabella~ */ GOTO 23 END IF ~~ THEN BEGIN 84 // from: 475.26 471.26 467.26 463.26 459.26 83.0 13.26 SAY #100001 /* ~Well, Moonblades, actually, Elven weapons generally are tricky things. It'd take me a couple of days to prepare everything, and you'd need to come back then to help me forge it. Me apprentice is in Adbar, and I ain't got enough help. It'd also cost ye, a good 25,000 gold for the use of me forge. Still want to do it?~ */ IF ~PartyGoldGT(24999) ~ THEN REPLY #100002 /* ~Yes, Cromwell. Here's the gold and parts. I'll come back in a few days and help you out.~ */ DO ~TakePartyGold(25000) DestroyGold(25000) TakePartyItem("CBEMHILT") TakePartyItem("CBEMMETL") SetGlobal("CbCromwellForgesMoonblade","AR0334",1) SetGlobalTimer("CbCromwellMoonbladeTimer","AR0334",TWO_DAYS) ~ GOTO 85 IF ~PartyGoldLT(25000) ~ THEN REPLY #100003 /* ~Yes, Cromwell, but I don't have the money right now. I'll have to come back with it.~ */ GOTO 86 IF ~PartyHasItem("sdnpcsw3") PartyHasItem("misc6m") PartyHasItem("wand07") PartyGoldGT(19999) ~ THEN REPLY #329139 /* ~Yes, let's do it!~ */ DO ~TakePartyGold(20000) DestroyGold(20000) TakePartyItemNum("sdnpcsw3",1) DestroyItem("sdnpcsw3") TakePartyItemNum("misc6m",1) DestroyItem("misc6m") TakePartyItemNum("wand07",1) DestroyItem("wand07") GiveItemCreate("sdnpcsw4","sdnpc",1,1,1) CreateVisualEffect("spcrtwpn",[401.348]) ~ EXIT IF ~PartyHasItem("sdnpcsw3") !PartyHasItem("misc6m") PartyHasItem("wand07") PartyGoldGT(19999) PartyHasItem("plot02i") ~ THEN REPLY #329139 /* ~Yes, let's do it!~ */ DO ~TakePartyGold(20000) DestroyGold(20000) TakePartyItemNum("sdnpcsw3",1) DestroyItem("sdnpcsw3") TakePartyItemNum("plot02i",1) DestroyItem("plot02i") TakePartyItemNum("wand07",1) DestroyItem("wand07") GiveItemCreate("sdnpcsw4","sdnpc",1,1,1) CreateVisualEffect("spcrtwpn",[401.348]) ~ EXIT IF ~PartyHasItem("sdnpcsw3") !PartyHasItem("misc6m") PartyHasItem("wand07") PartyGoldGT(19999) PartyHasItem("plot02j") ~ THEN REPLY #329139 /* ~Yes, let's do it!~ */ DO ~TakePartyGold(20000) DestroyGold(20000) TakePartyItemNum("sdnpcsw3",1) DestroyItem("sdnpcsw3") TakePartyItemNum("plot02j",1) DestroyItem("plot02j") TakePartyItemNum("wand07",1) DestroyItem("wand07") GiveItemCreate("sdnpcsw4","sdnpc",1,1,1) CreateVisualEffect("spcrtwpn",[401.348]) ~ EXIT IF ~~ THEN REPLY #100004 /* ~Not right now, Cromwell. Maybe later.~ */ GOTO 87 END IF ~~ THEN BEGIN 85 // from: 84.0 SAY #100005 /* ~You got it, . I'll have everything ready by then.~ */ IF ~~ THEN GOTO 4 END IF ~~ THEN BEGIN 86 // from: 84.1 SAY #100006 /* ~If ye raise enough, come and see me. I won't be startin' to do the preparations till ye put up the money.~ */ IF ~~ THEN GOTO 4 END IF ~~ THEN BEGIN 87 // from: 84.5 SAY #100007 /* ~Aye, , as ye wish. But a Moonblade's somethin' to be treasured, and the sooner ye have one, the better off ye'll be.~ */ IF ~~ THEN EXIT END IF WEIGHT #8 /* Triggers after states #: 142 349 458 even though they appear after this state */ ~Global("CbCromwellForgesMoonblade","AR0334",1) !GlobalTimerExpired("CbCromwellMoonbladeTimer","AR0334") ~ THEN BEGIN 88 // from: SAY #100008 /* ~I still haven't finished up preparin' for the forging of ye Moonblade. Come back in a while longer yet.~ */ IF ~~ THEN EXIT END IF WEIGHT #9 /* Triggers after states #: 142 349 458 even though they appear after this state */ ~Global("CbCromwellForgesMoonblade","AR0334",1) GlobalTimerExpired("CbCromwellMoonbladeTimer","AR0334") ~ THEN BEGIN 89 // from: SAY #100009 /* ~Ye be right on time, . All is about ready for the forging of ye Moonblade. Are ye ready to help me?~ */ IF ~~ THEN REPLY #100010 /* ~Yes, Cromwell. Let's start this.~ */ GOTO 90 IF ~~ THEN REPLY #100011 /* ~Not yet, Cromwell. Give me a few more hours.~ */ GOTO 91 END IF ~~ THEN BEGIN 90 // from: 89.0 SAY #100012 /* ~Aye, . Listen closely to my instructions, lest the magic fail....~ */ IF ~~ THEN DO ~SetGlobal("CbCromwellForgesMoonblade","AR0334",3) ClearAllActions() StartCutSceneMode() StartCutScene("CROMWELL") ~ EXIT END IF ~~ THEN BEGIN 91 // from: 89.1 SAY #100013 /* ~Aye, . You be on the clock, so I'll wait long as ye need.~ */ IF ~~ THEN GOTO 4 END IF WEIGHT #10 /* Triggers after states #: 142 349 458 even though they appear after this state */ ~Global("CbCromwellForgesMoonblade","AR0334",3) ~ THEN BEGIN 92 // from: SAY #100014 /* ~It is done, . The Moonblade is whole.~ */ IF ~~ THEN GOTO 93 END IF ~~ THEN BEGIN 93 // from: 92.0 SAY #100015 /* ~I honor you with the blade, as you honor me in trusting me with such a tremendous smithing task. Thank you, .~ */ IF ~~ THEN DO ~SetGlobal("CbCromwellForgesMoonblade","AR0334",4) GiveItemCreate("CBEMMOON",LastTalkedToBy(Myself),1,0,0) AddexperienceParty(12500) ~ EXIT END IF ~~ THEN BEGIN 94 // from: 475.12 471.12 467.12 463.12 459.12 445.12 441.12 437.12 433.12 428.12 424.12 420.12 416.12 400.12 389.12 378.12 373.12 329.11 318.11 314.11 310.11 306.11 300.11 296.11 292.11 288.11 284.11 280.11 276.11 272.11 268.11 264.11 260.11 255.11 251.11 247.11 243.11 239.11 235.11 231.11 227.11 223.11 219.11 215.11 211.11 207.11 202.11 198.11 194.11 190.11 185.11 181.11 177.11 173.11 169.11 165.11 161.11 157.11 151.11 147.11 143.11 138.11 13.12 SAY #99987 /* ~Look't here. A hilt. Darned thing is broken. How'd you be doing this?~ */ IF ~~ THEN GOTO 95 END IF ~~ THEN BEGIN 95 // from: 94.0 SAY #99988 /* ~What's this thing for?~ */ IF ~~ THEN REPLY #100016 /* ~Cromwell, it's part of a sword. A Spellsung Blade, in fact. I want to rebuild it.~ */ GOTO 96 END IF ~~ THEN BEGIN 96 // from: 95.0 SAY #100017 /* ~A Spellsung blade, you say? Wonders never cease! I ain't seen one of these in a long time. How'd you break it?~ */ IF ~!PartyHasItem("CBEMMETL") ~ THEN REPLY #99991 /* ~I didn't break it. I have to fix it, but don't know what I need to fix it. Do you?~ */ GOTO 97 IF ~PartyHasItem("CBEMMETL") ~ THEN REPLY #100018 /* ~I didn't break it. I have to fix it, and I have some persephonium to rebuild the hilt. Can you do it?~ */ GOTO 99 END IF ~~ THEN BEGIN 97 // from: 96.0 SAY #100019 /* ~There be only one thing that can be used to forge Spellsung Blades. Persephonium. You be needin' to get some from the mines up in Eaerlann. Ascalhorn used to be minin' persephonium, but the damned demons put a stop to that.~ */ IF ~~ THEN GOTO 98 END IF ~~ THEN BEGIN 98 // from: 97.0 SAY #100020 /* ~You be bringing me some persephonium, sure as Clangeddin's hammer do I be able to forge the blade. Mayhaps the hilt will have also retained the magics, and you'd have yourself a bonnie blade indeed.~ */ IF ~~ THEN REPLY #99994 /* ~All right, Cromwell. I'll try and find some persephonium. Thanks.~ */ GOTO 4 END IF ~~ THEN BEGIN 99 // from: 96.1 SAY #100012 /* ~Aye, . Listen closely to my instructions, lest the magic fail....~ */ IF ~~ THEN DO ~SetGlobal("CbCromwellForgesSpellsung","AR0334",3) TakePartyItem("CBEMMETL") TakePartyItem("CBSSHILT") ClearAllActions() StartCutSceneMode() StartCutScene("CROMWELL") ~ EXIT END IF WEIGHT #11 /* Triggers after states #: 142 349 458 even though they appear after this state */ ~Global("CbCromwellForgesSpellsung","AR0334",3) ~ THEN BEGIN 100 // from: SAY #100021 /* ~It is done, . The Spellsung Blade is whole.~ */ IF ~~ THEN GOTO 101 END IF ~~ THEN BEGIN 101 // from: 100.0 SAY #100015 /* ~I honor you with the blade, as you honor me in trusting me with such a tremendous smithing task. Thank you, .~ */ IF ~~ THEN DO ~SetGlobal("CbCromwellForgesSpellsung","AR0334",4) GiveItemCreate("CBSSSHRT",LastTalkedToBy(Myself),1,0,0) AddexperienceParty(12500) ~ EXIT END IF ~~ THEN BEGIN 102 // from: 475.13 471.13 467.13 463.13 459.13 445.13 441.13 437.13 433.13 428.13 424.13 420.13 416.13 400.13 389.13 378.13 373.13 329.12 318.12 314.12 310.12 306.12 300.12 296.12 292.12 288.12 284.12 280.12 276.12 272.12 268.12 264.12 260.12 255.12 251.12 247.12 243.12 239.12 235.12 231.12 227.12 223.12 219.12 215.12 211.12 207.12 202.12 198.12 194.12 190.12 185.12 181.12 177.12 173.12 169.12 165.12 161.12 157.12 151.12 147.12 143.12 138.12 13.13 SAY #100022 /* ~Aye, , look at whats ye got here.~ */ IF ~PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") ~ THEN GOTO 103 IF ~!PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 104 IF ~PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 105 END IF ~~ THEN BEGIN 103 // from: 102.0 SAY #100023 /* ~Ye got yerself a nice staff, but it be rough. Needs a bit o' work on it. 'Haps if I had stout oak I could be refinishin' the staff fer ye, but not without havin' wood. Bring me some oak, a nice long branch, mind ye, but it cannae have knots, and we'll fix this right up fer ye.~ */ IF ~~ THEN EXIT END IF ~~ THEN BEGIN 104 // from: 102.1 SAY #100024 /* ~Ye got yerself some solid oak, a nice pole and it doesn't even have knots. I could be workin' this into a nice oaken staff fer ye, but I cannae do it without having somethin' to look at. Ye be bringin' a staff, sure as me beard is wet, I'll whittle ye a staff fer thumpin' folks on their rumps.~ */ IF ~~ THEN EXIT END IF ~~ THEN BEGIN 105 // from: 102.2 SAY #100025 /* ~Ye be havin' a nice pole of solid oak, and a broken staff, . I could be workin' it out fer ya, if ye'd want to help me with it. I cannae do it without yer help though. What says ye?~ */ IF ~PartyGoldGT(999) ~ THEN REPLY #100026 /* ~Can you do it for 1000 gold pieces?~ */ GOTO 106 IF ~~ THEN REPLY #100027 /* ~No, Cromwell. What else do I have that you could do?~ */ GOTO 19 END IF ~~ THEN BEGIN 106 // from: 105.0 SAY #100028 /* ~Sure, me friend. I'd do it for 1,000 gp, no less mind ye, and ye'll have to stay for a while and help me with the forge.~ */ IF ~~ THEN REPLY #100029 /* ~All right, Cromwell. Go ahead.~ */ DO ~SetGlobal("ForgeItem","GLOBAL",44) TakePartyGold(1000) DestroyGold(1000) ~ GOTO 107 IF ~~ THEN REPLY #100027 /* ~No, Cromwell. What else do I have that you could do?~ */ GOTO 23 END IF ~~ THEN BEGIN 107 // from: 106.0 SAY #100030 /* ~As ye wish. We can start on it right away.~ */ IF ~~ THEN DO ~SetGlobal("CbCromwellForgesStaff","AR0334",1) SetGlobal("ForgeItem","GLOBAL",44) Wait(1) StartCutSceneMode() StartCutScene("CROMWELL") ~ EXIT END IF WEIGHT #12 /* Triggers after states #: 142 349 458 even though they appear after this state */ ~Global("CbCromwellForgesStaff","AR0334",1) Global("ForgeItem","GLOBAL",44) Global("ForgeStuff","GLOBAL",0) ~ THEN BEGIN 108 // from: SAY #100031 /* ~Well, there ye go, me friend. A nice staff. Use it well. And if ye comes across anything else of interest, ye knows where to bring it, aye.~ */ IF ~~ THEN DO ~SetGlobal("ForgeItem","GLOBAL",0) SetGlobal("CbCromwellForgesStaff","AR0334",2) ~ EXIT END IF ~~ THEN BEGIN 109 // from: 475.14 471.14 467.14 463.14 459.14 445.14 441.14 437.14 433.14 428.14 424.14 420.14 416.14 400.14 389.14 378.14 373.14 329.13 318.13 314.13 310.13 306.13 300.13 296.13 292.13 288.13 284.13 280.13 276.13 272.13 268.13 264.13 260.13 255.13 251.13 247.13 243.13 239.13 235.13 231.13 227.13 223.13 219.13 215.13 211.13 207.13 202.13 198.13 194.13 190.13 185.13 181.13 177.13 173.13 169.13 165.13 161.13 157.13 151.13 147.13 143.13 138.13 13.14 SAY #100022 /* ~Aye, , look at whats ye got here.~ */ IF ~PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") ~ THEN GOTO 110 IF ~!PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 111 IF ~PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 112 END IF ~~ THEN BEGIN 110 // from: 109.0 SAY #100032 /* ~Ye got yerself a nice axe, but the blade be dull. Needs a bit o' work on it. 'Haps if I had some ore, I could be sharpenin' and fillin' the knicks fer ye, but not without havin' smelted ore. Bring me some ore, smelted mind ye, but it cannae be already forged, and we'll fix this right up fer ye.~ */ IF ~~ THEN EXIT END IF ~~ THEN BEGIN 111 // from: 109.1 SAY #100033 /* ~Ye got yerself some smelted ore, a lot o' it, at that. I could be workin' this into a nice edged weapon fer ye, but there isn't enough for a entire blade, so I cannae do it without having somethin' to add it to. Ye be bringin' another weapon, sure as me beard is wet, I'll forge ye up a right blade, mayhaps an axe, fer cleavin' folks through their heads.~ */ IF ~~ THEN EXIT END IF ~~ THEN BEGIN 112 // from: 109.2 SAY #100034 /* ~Ye be havin' a nice axe, but the blade be dull. And ye got yerself some smelted ore, . I could be workin' these two together fer ya, if ye'd want to help me with it. I cannae do it without yer help though. What says ye?~ */ IF ~PartyGoldGT(9999) ~ THEN REPLY #100035 /* ~Can you do it for 10000 gold pieces?~ */ GOTO 113 IF ~~ THEN REPLY #100027 /* ~No, Cromwell. What else do I have that you could do?~ */ GOTO 19 END IF ~~ THEN BEGIN 113 // from: 112.0 SAY #100036 /* ~Sure, me friend. I'd do it for 10,000 gp, no less mind ye, and ye'll have to stay for a while and help me with the forge.~ */ IF ~~ THEN REPLY #100029 /* ~All right, Cromwell. Go ahead.~ */ DO ~SetGlobal("ForgeItem","GLOBAL",45) TakePartyGold(10000) DestroyGold(10000) ~ GOTO 114 IF ~~ THEN REPLY #100027 /* ~No, Cromwell. What else do I have that you could do?~ */ GOTO 23 END IF ~~ THEN BEGIN 114 // from: 113.0 SAY #100030 /* ~As ye wish. We can start on it right away.~ */ IF ~~ THEN DO ~SetGlobal("CbCromwellForgesAxe","AR0334",1) SetGlobal("ForgeItem","GLOBAL",45) Wait(1) StartCutSceneMode() StartCutScene("CROMWELL") ~ EXIT END IF WEIGHT #13 /* Triggers after states #: 142 349 458 even though they appear after this state */ ~Global("CbCromwellForgesAxe","AR0334",1) Global("ForgeItem","GLOBAL",45) Global("ForgeStuff","GLOBAL",0) ~ THEN BEGIN 115 // from: SAY #100037 /* ~Well, there ye go, me friend. A nice axe. Use it well. And if ye comes across anything else of interest, ye knows where to bring it, aye.~ */ IF ~~ THEN DO ~SetGlobal("ForgeItem","GLOBAL",0) SetGlobal("CbCromwellForgesAxe","AR0334",2) ~ EXIT END IF ~~ THEN BEGIN 116 // from: 475.15 471.15 467.15 463.15 459.15 445.15 441.15 437.15 433.15 428.15 424.15 420.15 416.15 400.15 389.15 378.15 373.15 329.14 318.14 314.14 310.14 306.14 300.14 296.14 292.14 288.14 284.14 280.14 276.14 272.14 268.14 264.14 260.14 255.14 251.14 247.14 243.14 239.14 235.14 231.14 227.14 223.14 219.14 215.14 211.14 207.14 202.14 198.14 194.14 190.14 185.14 181.14 177.14 173.14 169.14 165.14 161.14 157.14 151.14 147.14 143.14 138.14 13.15 SAY #100022 /* ~Aye, , look at whats ye got here.~ */ IF ~PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") ~ THEN GOTO 117 IF ~!PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 118 IF ~PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 119 END IF ~~ THEN BEGIN 117 // from: 116.0 SAY #100038 /* ~Ye got yerself a hammer head, but the handle be missin'. Needs a bit o' work. 'Haps if I had somethin' to attach the head to, I could be forgin' and fillin' the warhammer fer ye. Bring me a handle, the same metal- titanium, mind ye, and we'll fix this right up fer ye.~ */ IF ~~ THEN EXIT END IF ~~ THEN BEGIN 118 // from: 116.1 SAY #100039 /* ~Ye got yerself a titanium handle, a nice one at that. I could be workin' this into a hammer fer ya, but ye don't have a head to be mountin' on it, so I cannae do it. Ye be bringin' a warhammer head, and sure as me beard is wet, I'll forge ye up a right warhammer fer crushin' folks heads.~ */ IF ~~ THEN EXIT END IF ~~ THEN BEGIN 119 // from: 116.2 SAY #100040 /* ~Ye be havin' a nice hammer head, but it be missin' the shaft. But look it here, ye got yerself a titanium handle! , I could be workin' these two together into a bonnie warhammer fer ya, if ye'd want to help me with it. I cannae do it without yer help though. What says ye?~ */ IF ~PartyGoldGT(19999) ~ THEN REPLY #100041 /* ~Can you do it for 20000 gold pieces?~ */ GOTO 120 IF ~~ THEN REPLY #100042 /* ~No, Cromwell, I don't think I could afford it right now. What else do I have that you could do?~ */ GOTO 19 END IF ~~ THEN BEGIN 120 // from: 119.0 SAY #100043 /* ~Sure, me friend. I'd do it for 20,000 gp, no less mind ye, and ye'll have to stay for a while and help me with the forge.~ */ IF ~~ THEN REPLY #100029 /* ~All right, Cromwell. Go ahead.~ */ DO ~SetGlobal("ForgeItem","GLOBAL",46) TakePartyGold(20000) DestroyGold(20000) ~ GOTO 121 IF ~~ THEN REPLY #100027 /* ~No, Cromwell. What else do I have that you could do?~ */ GOTO 23 END IF ~~ THEN BEGIN 121 // from: 120.0 SAY #100030 /* ~As ye wish. We can start on it right away.~ */ IF ~~ THEN DO ~SetGlobal("CbCromwellForgesHammer","AR0334",1) SetGlobal("ForgeItem","GLOBAL",46) Wait(1) StartCutSceneMode() StartCutScene("CROMWELL") ~ EXIT END IF WEIGHT #14 /* Triggers after states #: 142 349 458 even though they appear after this state */ ~Global("CbCromwellForgesHammer","AR0334",1) Global("ForgeItem","GLOBAL",46) Global("ForgeStuff","GLOBAL",0) ~ THEN BEGIN 122 // from: SAY #100044 /* ~Well, there ye go, me friend. A heavy warhammer for crushin' those annoyin' goblins to a pulp. Use it well. And if ye comes across anything else of interest, ye knows where to bring it, aye.~ */ IF ~~ THEN DO ~SetGlobal("ForgeItem","GLOBAL",0) SetGlobal("CbCromwellForgesHammer","AR0334",2) ~ EXIT END IF ~~ THEN BEGIN 123 // from: 364.7 361.6 58.7 0.6 SAY #177559 /* ~Pew! What do ye carry this for? Stinkin' and more'n a might gross.~ */ IF ~~ THEN REPLY #177560 /* ~Can you make it into a ring for me?~ */ GOTO 124 IF ~Global("TalkedToCromwell","LOCALS",0) ~ THEN REPLY #59803 /* ~What sorts of things do you forge here?~ */ GOTO 8 IF ~Global("TalkedToCromwell","LOCALS",0) ~ THEN REPLY #59799 /* ~What do you have for sale, here?~ */ GOTO 2 IF ~Global("TalkedToCromwell","LOCALS",1) ~ THEN REPLY #59800 /* ~What sorts of things would you need in order to make something?~ */ GOTO 11 IF ~Global("TalkedToCromwell","LOCALS",1) ~ THEN REPLY #59801 /* ~Do I have anything you could forge into an item?~ */ GOTO 13 END IF ~~ THEN BEGIN 124 // from: 123.0 SAY #177561 /* ~Ye've a strange taste, I grant, though I'm willin' to make anything from anything. A ring this'll be! In fact, it'll be a Troll's Whisper if me recipe be right.~ */ IF ~~ THEN GOTO 125 END IF ~~ THEN BEGIN 125 // from: 124.0 SAY #177562 /* ~That is, if ye sure that's what ye'd like. It may be unworth ye time.~ */ IF ~~ THEN REPLY #177563 /* ~What would it involve?~ */ GOTO 126 END IF ~~ THEN BEGIN 126 // from: 125.0 SAY #177564 /* ~Ye must stay and run the forge with me...and ye be payin' 5000 gold too for me time.~ */ IF ~PartyGoldGT(4999) ~ THEN REPLY #59775 /* ~That sounds fine. Let's do it.~ */ DO ~TakePartyGold(5000) DestroyGold(5000) EraseJournalEntry(177509) SetGlobal("CliffCromwellTroll","GLOBAL",1) ~ UNSOLVED_JOURNAL #177476 /* ~For the love of a troll Cromwell has created the ring, Troll's Whisper, from the fingers of the trolls that Tegenk gave to me. It is Tegenk's wish that I present this ring to Cerese in Trademeet and bring her back to him.~ */ GOTO 56 IF ~!PartyGold(4999) ~ THEN REPLY #177565 /* ~I have not the gold...perhaps another time.~ */ DO ~SetGlobal("CliffDollars","GLOBAL",1) ~ GOTO 12 IF ~~ THEN REPLY #68392 /* ~No, I don't think so.~ */ GOTO 12 END IF ~~ THEN BEGIN 127 // from: 475.17 471.17 467.17 463.17 459.17 445.17 441.17 437.17 433.17 428.17 424.17 420.17 416.17 400.17 389.17 378.17 373.17 329.16 318.16 314.16 310.16 306.16 300.16 296.16 292.16 288.16 284.16 280.16 276.16 272.16 268.16 264.16 260.16 255.16 251.16 247.16 243.16 239.16 235.16 231.16 227.16 223.16 219.16 215.16 211.16 207.16 202.16 198.16 194.16 190.16 185.16 181.16 177.16 173.16 169.16 165.16 161.16 157.16 151.16 147.16 143.16 13.17 SAY #186500 /* ~Now what is dis? I can't believe it... Part of the famous Deathbringer crossbow! The greatest achievement of Sigwald! ~ */ IF ~PartyHasItem("SGMISC4") !PartyHasItem("SGMISC5") !PartyHasItem("SGMISC6") ~ THEN GOTO 128 IF ~!PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") !PartyHasItem("SGMISC6") ~ THEN GOTO 130 IF ~!PartyHasItem("SGMISC4") !PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 131 IF ~PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") !PartyHasItem("SGMISC6") ~ THEN GOTO 132 IF ~PartyHasItem("SGMISC4") !PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 133 IF ~!PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 134 IF ~PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 135 END IF ~~ THEN BEGIN 128 // from: 127.0 SAY #186501 /* ~Unfortunately, ye've only got the bow string, I'd be needing the frame and Sigwald's instructions to recreate that masterpiece. ~ */ IF ~~ THEN GOTO 129 END IF ~~ THEN BEGIN 129 // from: 135.1 134.0 133.0 132.0 131.0 130.0 128.0 SAY #59763 /* ~I'll keep looking. Hmmm.... I see...~ */ IF ~~ THEN GOTO 138 END IF ~~ THEN BEGIN 130 // from: 127.1 SAY #186502 /* ~Ah well, what a pity, ye've just got the crossbow frame. I'd need the bowstring and Sigwald's instructions to be able to recreate the crossbow. ~ */ IF ~~ THEN GOTO 129 END IF ~~ THEN BEGIN 131 // from: 127.2 SAY #186503 /* ~Unfortunately, ye just have Sigwald's instructions on how to do the damn crossbow. I'd be needing the string and frame to complete it. ~ */ IF ~~ THEN GOTO 129 END IF ~~ THEN BEGIN 132 // from: 127.3 SAY #186504 /* ~Ah well, you are missing Sigwald's instructions. Without these, I cannot recreate the Deathbringer. ~ */ IF ~~ THEN GOTO 129 END IF ~~ THEN BEGIN 133 // from: 127.4 SAY #186505 /* ~A pity... You are missing the crossbow frame. If you find it, make sure you come back to me! ~ */ IF ~~ THEN GOTO 129 END IF ~~ THEN BEGIN 134 // from: 127.5 SAY #186506 /* ~Damn, ye have both the frame and Sigwald's instructions. Ye just miss the bow string. Try hard to find it, you will not regret it!~ */ IF ~~ THEN GOTO 129 END IF ~~ THEN BEGIN 135 // from: 127.6 SAY #186507 /* ~Oh my, oh my.... You got all the parts to recreate the Deathbringer! ~ */ IF ~~ THEN REPLY #59767 /* ~What's involved in that?~ */ GOTO 136 IF ~~ THEN REPLY #59768 /* ~No, I don't think so. Anything else of use?~ */ GOTO 129 END IF ~~ THEN BEGIN 136 // from: 135.0 SAY #59792 /* ~Two things, me friend. It will cost ye 10,000 gp for the work, no less, and without an apprentice, ye'll have to stay here a full day and help me run the forge.~ */ IF ~PartyGoldGT(9999) ~ THEN REPLY #59793 /* ~That sounds fine. Let's do it.~ */ DO ~TakePartyGold(10000) DestroyGold(10000) SetGlobal("SGForgeItem","AR0334",10) ~ GOTO 56 IF ~~ THEN REPLY #59794 /* ~No, I don't think so. Do I have anything else useful?~ */ GOTO 138 END IF ~~ THEN BEGIN 137 // from: SAY #59706 /* ~Another time, then, me friend. Cromwell wishes ye a fair journey.~ */ IF ~~ THEN EXIT END IF ~~ THEN BEGIN 138 // from: 475.16 471.16 467.16 463.16 459.16 445.16 441.16 437.16 433.16 428.16 424.16 420.16 416.16 400.16 389.16 378.16 373.16 329.15 318.15 314.15 310.15 306.15 300.15 296.15 292.15 288.15 284.15 280.15 276.15 272.15 268.15 264.15 260.15 255.15 251.15 247.15 243.15 239.15 235.15 231.15 227.15 223.15 219.15 215.15 211.15 207.15 202.15 198.15 194.15 190.15 185.15 181.15 177.15 173.15 169.15 165.15 161.15 157.15 151.15 147.15 143.15 136.1 129.0 13.16 SAY #186508 /* ~Pass over what yer gots then.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 END IF ~~ THEN BEGIN 139 // from: 475.19 471.19 467.19 463.19 459.19 445.19 441.19 437.19 433.19 428.19 424.19 420.19 416.19 400.19 389.19 378.19 373.19 329.18 318.18 314.18 310.18 306.18 300.18 296.18 292.18 288.18 284.18 280.18 276.18 272.18 268.18 264.18 260.18 255.18 251.18 247.18 243.18 239.18 235.18 231.18 227.18 223.18 219.18 215.18 211.18 207.18 202.18 198.18 194.18 190.18 185.18 181.18 177.18 173.18 169.18 165.18 161.18 157.18 151.18 147.18 13.19 SAY #187618 /* ~These amulets you be wearin' look workable. Mind if I have a look?~ */ IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") NumItemsPartyLT("amul14",2) ~ THEN GOTO 140 IF ~PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") NumItemsPartyGT("amul14",1) ~ THEN GOTO 141 END IF ~~ THEN BEGIN 140 // from: 139.0 SAY #187619 /* ~With two Amulets of Protection, a Periapt of Proof against Poison, a Necklace of Form Stability and an Amulet of Spell Warding I could forge for ye an Amulet of Ilmater. About 10,000 gold should cover me expenses.~ */ IF ~~ THEN GOTO 143 END IF ~~ THEN BEGIN 141 // from: 139.1 SAY #187620 /* ~With two Amulets of Protection, a Periapt of Proof against Poison, a Necklace of Form Stability and an Amulet of Spell Warding I could forge for ye an Amulet of Ilmater. Would you be willin' to pay 10,000 gold for it?~ */ IF ~PartyGoldLT(10000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 143 IF ~PartyGoldGT(9999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",35) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(10000) DestroyGold(10000) TakePartyItemNum("amul22",1) DestroyItem("amul22") TakePartyItemNum("amul24",1) DestroyItem("amul24") TakePartyItemNum("amul25",1) DestroyItem("amul25") TakePartyItemNum("amul14",1) DestroyItem("amul14") TakePartyItemNum("amul14",1) DestroyItem("amul14") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 143 END IF WEIGHT #2 /* Triggers after states #: 349 458 even though they appear after this state */ ~GlobalGT("XO#Craft","ar0334",0) ~ THEN BEGIN 142 // from: SAY #59797 /* ~Well, there ye go, me friend. Use it well. And if ye comes across anything else of interest, ye knows where to bring it, aye?~ */ IF ~~ THEN DO ~SetGlobal("XO#Craft","ar0334",0) ~ EXIT END IF ~~ THEN BEGIN 143 // from: 141.2 141.0 140.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT END IF ~~ THEN BEGIN 144 // from: 475.20 471.20 467.20 463.20 459.20 445.20 441.20 437.20 433.20 428.20 424.20 420.20 416.20 400.20 389.20 378.20 373.20 329.19 318.19 314.19 310.19 306.19 300.19 296.19 292.19 288.19 284.19 280.19 276.19 272.19 268.19 264.19 260.19 255.19 251.19 247.19 243.19 239.19 235.19 231.19 227.19 223.19 219.19 215.19 211.19 207.19 202.19 198.19 194.19 190.19 185.19 181.19 177.19 173.19 169.19 165.19 161.19 157.19 151.19 13.20 SAY #187622 /* ~Ah, this brash lad has a fine shield. Mind if I take a look?~ */ IF ~PartyHasItem("npshld") !PartyHasItem("shld27") ~ THEN GOTO 145 IF ~PartyHasItem("npshld") PartyHasItem("shld27") ~ THEN GOTO 146 END IF ~~ THEN BEGIN 145 // from: 144.0 SAY #187623 /* ~Yes. I could combine the armor plating from Anomen's shield with that of the famous shield Saving Grace. I'd charge 15,000 for the work.~ */ IF ~~ THEN GOTO 147 END IF ~~ THEN BEGIN 146 // from: 144.1 SAY #187624 /* ~Yes. I could combine the armor plating from Anomen's shield with that of the famous shield Saving Grace. I'd charge 15,000 for the work. So? What say ye?~ */ IF ~PartyGoldLT(15000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 147 IF ~PartyGoldGT(14999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",30) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(15000) DestroyGold(15000) TakePartyItemNum("npshld",1) DestroyItem("npshld") TakePartyItemNum("shld27",1) DestroyItem("shld27") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 147 END IF ~~ THEN BEGIN 147 // from: 146.2 146.0 145.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 END IF ~~ THEN BEGIN 148 // from: 475.21 471.21 467.21 463.21 459.21 445.21 441.21 437.21 433.21 428.21 424.21 420.21 416.21 400.21 389.21 378.21 373.21 329.20 318.20 314.20 310.20 306.20 300.20 296.20 292.20 288.20 284.20 280.20 276.20 272.20 268.20 264.20 260.20 255.20 251.20 247.20 243.20 239.20 235.20 231.20 227.20 223.20 219.20 215.20 211.20 207.20 202.20 198.20 194.20 190.20 185.20 181.20 177.20 173.20 169.20 165.20 161.20 157.20 13.21 SAY #187625 /* ~This looks interesting...~ */ IF ~PartyHasItem("ax1h10") !PartyHasItem("misc5k") ~ THEN GOTO 149 IF ~PartyHasItem("ax1h10") PartyHasItem("misc5k") ~ THEN GOTO 150 END IF ~~ THEN BEGIN 149 // from: 148.0 SAY #187626 /* ~Ah. I could apply a coating of pure illithium to Azuredge, granting further offensive and defensive powers against the evils of the undead. For 20,000 gold I'd do the work for you.~ */ IF ~~ THEN GOTO 151 END IF ~~ THEN BEGIN 150 // from: 148.1 SAY #187627 /* ~Ah. I could apply a coating of pure illithium to Azuredge, granting further offensive and defensive powers against the evils of the undead. For 20,000 gold I'd do the work for you. Ye interested?~ */ IF ~PartyGoldLT(20000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 151 IF ~PartyGoldGT(19999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",37) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(20000) DestroyGold(20000) TakePartyItemNum("ax1h10",1) DestroyItem("ax1h10") TakePartyItemNum("misc5k",1) DestroyItem("misc5k") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 151 END IF ~~ THEN BEGIN 151 // from: 150.2 150.0 149.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 END IF ~~ THEN BEGIN 152 // from: 475.22 471.22 467.22 463.22 459.22 445.22 441.22 437.22 433.22 428.22 424.22 420.22 416.22 400.22 389.22 378.22 373.22 329.21 318.21 314.21 310.21 306.21 300.21 296.21 292.21 288.21 284.21 280.21 276.21 272.21 268.21 264.21 260.21 255.21 251.21 247.21 243.21 239.21 235.21 231.21 227.21 223.21 219.21 215.21 211.21 207.21 202.21 198.21 194.21 190.21 185.21 181.21 177.21 173.21 169.21 165.21 161.21 13.22 SAY #187628 /* ~Hmm, I could do something with these belts...~ */ IF ~PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") NumItemsPartyGT("misc20",2) ~ THEN GOTO 154 IF ~PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") NumItemsPartyGT("amul13",2) ~ THEN GOTO 155 IF ~PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") NumItemsPartyGT("ring15",2) ~ THEN GOTO 156 IF ~OR(3) NumItemsPartyLT("misc20",3) NumItemsPartyLT("amul13",3) NumItemsPartyLT("ring15",3) ~ THEN GOTO 153 END IF ~~ THEN BEGIN 153 // from: 152.3 SAY #187629 /* ~Aye, if you had a matched set of girdle: blunt, piercing and slashing, I could forge them all together into a truly protective item. I'd need three bloodstones for reagents, and 10,000 gold as a commission.~ */ IF ~~ THEN GOTO 157 END IF ~~ THEN BEGIN 154 // from: 152.0 SAY #187630 /* ~Aye, if you had a matched set of girdle: blunt, piercing and slashing, I could forge them all together into a truly protective item. I'd need three bloodstones for reagents, and 10,000 gold as a commission. Interested?~ */ IF ~PartyGoldLT(10000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 157 IF ~PartyGoldGT(9999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",42) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(10000) DestroyGold(10000) TakePartyItemNum("belt03",1) DestroyItem("belt03") TakePartyItemNum("belt02",1) DestroyItem("belt02") TakePartyItemNum("belt04",1) DestroyItem("belt04") TakePartyItemNum("misc20",1) DestroyItem("misc20") TakePartyItemNum("misc20",1) DestroyItem("misc20") TakePartyItemNum("misc20",1) DestroyItem("misc20") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 157 END IF ~~ THEN BEGIN 155 // from: 152.1 SAY #187630 /* ~Aye, if you had a matched set of girdle: blunt, piercing and slashing, I could forge them all together into a truly protective item. I'd need three bloodstones for reagents, and 10,000 gold as a commission. Interested?~ */ IF ~PartyGoldLT(10000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 157 IF ~PartyGoldGT(9999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",42) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(10000) DestroyGold(10000) TakePartyItemNum("belt03",1) DestroyItem("belt03") TakePartyItemNum("belt02",1) DestroyItem("belt02") TakePartyItemNum("belt04",1) DestroyItem("belt04") TakePartyItemNum("amul13",1) DestroyItem("amul13") TakePartyItemNum("amul13",1) DestroyItem("amul13") TakePartyItemNum("amul13",1) DestroyItem("amul13") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 157 END IF ~~ THEN BEGIN 156 // from: 152.2 SAY #187630 /* ~Aye, if you had a matched set of girdle: blunt, piercing and slashing, I could forge them all together into a truly protective item. I'd need three bloodstones for reagents, and 10,000 gold as a commission. Interested?~ */ IF ~PartyGoldLT(10000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 157 IF ~PartyGoldGT(9999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",42) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(10000) DestroyGold(10000) TakePartyItemNum("belt03",1) DestroyItem("belt03") TakePartyItemNum("belt02",1) DestroyItem("belt02") TakePartyItemNum("belt04",1) DestroyItem("belt04") TakePartyItemNum("ring15",1) DestroyItem("ring15") TakePartyItemNum("ring15",1) DestroyItem("ring15") TakePartyItemNum("ring15",1) DestroyItem("ring15") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 157 END IF ~~ THEN BEGIN 157 // from: 156.2 156.0 155.2 155.0 154.2 154.0 153.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 END IF ~~ THEN BEGIN 158 // from: 475.23 471.23 467.23 463.23 459.23 445.23 441.23 437.23 433.23 428.23 424.23 420.23 416.23 400.23 389.23 378.23 373.23 329.22 318.22 314.22 310.22 306.22 300.22 296.22 292.22 288.22 284.22 280.22 276.22 272.22 268.22 264.22 260.22 255.22 251.22 247.22 243.22 239.22 235.22 231.22 227.22 223.22 219.22 215.22 211.22 207.22 202.22 198.22 194.22 190.22 185.22 181.22 177.22 173.22 169.22 165.22 13.23 SAY #187631 /* ~Hmm, I've heard of Blackblood, but never had the good fortune to see it up close. Let's see what we can do...~ */ IF ~PartyHasItem("blun22") !PartyHasItem("blun24") ~ THEN GOTO 159 IF ~PartyHasItem("blun22") PartyHasItem("blun24") ~ THEN GOTO 160 END IF ~~ THEN BEGIN 159 // from: 158.0 SAY #187632 /* ~I could combine the Blackblood and another sibling club I heard of - the Gnasher into a powerful club of acid-coated splinters. It would cost you 15,000 gold.~ */ IF ~~ THEN GOTO 161 END IF ~~ THEN BEGIN 160 // from: 158.1 SAY #187633 /* ~I could combine the Blackblood and the Gnasher into a powerful club of acid-coated splinters. It would cost you 15,000 gold. So, what ye say?~ */ IF ~PartyGoldLT(15000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 161 IF ~PartyGoldGT(14999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",9) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(15000) DestroyGold(15000) TakePartyItemNum("blun22",1) DestroyItem("blun22") TakePartyItemNum("blun24",1) DestroyItem("blun24") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 161 END IF ~~ THEN BEGIN 161 // from: 160.2 160.0 159.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 END IF ~~ THEN BEGIN 162 // from: 475.24 471.24 467.24 463.24 459.24 445.24 441.24 437.24 433.24 428.24 424.24 420.24 416.24 400.24 389.24 378.24 373.24 329.23 318.23 314.23 310.23 306.23 300.23 296.23 292.23 288.23 284.23 280.23 276.23 272.23 268.23 264.23 260.23 255.23 251.23 247.23 243.23 239.23 235.23 231.23 227.23 223.23 219.23 215.23 211.23 207.23 202.23 198.23 194.23 190.23 185.23 181.23 177.23 173.23 169.23 13.24 SAY #187634 /* ~Aye, the Skullcrusher - a dwarve's dream. Looks like it could be enhanced...~ */ IF ~PartyHasItem("blun18") OR(2) !PartyHasItem("scrl8o") !PartyHasItem("potn25") ~ THEN GOTO 163 IF ~PartyHasItem("blun18") PartyHasItem("scrl8o") PartyHasItem("potn25") ~ THEN GOTO 164 END IF ~~ THEN BEGIN 163 // from: 162.0 SAY #187635 /* ~With a Finger of Death scroll, a cursed potion of healing and 15,000 gold I could reforge the Skullcrusher for ye.~ */ IF ~~ THEN GOTO 165 END IF ~~ THEN BEGIN 164 // from: 162.1 SAY #187636 /* ~With a Finger of Death scroll, a cursed potion of healing and 15,000 gold I could reforge the Skullcrusher for ye. Interested?~ */ IF ~PartyGoldLT(15000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 165 IF ~PartyGoldGT(14999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",11) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(15000) DestroyGold(15000) TakePartyItemNum("blun18",1) DestroyItem("blun18") TakePartyItemNum("scrl8o",1) DestroyItem("scrl8o") TakePartyItemNum("potn25",1) DestroyItem("potn25") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 165 END IF ~~ THEN BEGIN 165 // from: 164.2 164.0 163.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 END IF ~~ THEN BEGIN 166 // from: 475.25 471.25 467.25 463.25 459.25 445.25 441.25 437.25 433.25 428.25 424.25 420.25 416.25 400.25 389.25 378.25 373.25 329.24 318.24 314.24 310.24 306.24 300.24 296.24 292.24 288.24 284.24 280.24 276.24 272.24 268.24 264.24 260.24 255.24 251.24 247.24 243.24 239.24 235.24 231.24 227.24 223.24 219.24 215.24 211.24 207.24 202.24 198.24 194.24 190.24 185.24 181.24 177.24 173.24 13.25 SAY #187637 /* ~A club made of bone? The current generation tries to use anything for their means! Well, let's see...~ */ IF ~PartyHasItem("blun23") !PartyHasItem("blun24") ~ THEN GOTO 167 IF ~PartyHasItem("blun23") PartyHasItem("blun24") ~ THEN GOTO 168 END IF ~~ THEN BEGIN 167 // from: 166.0 SAY #187638 /* ~I could combine the Bone Club and a club called the Gnasher into a powerful club... just perfect for servants of the Balance. It would cost you 15,000 gold.~ */ IF ~~ THEN GOTO 169 END IF ~~ THEN BEGIN 168 // from: 166.1 SAY #187639 /* ~I could combine the Bone Club and the Gnasher into a powerful club... just perfect for servants of the Balance. It would cost you 15,000 gold.~ */ IF ~PartyGoldLT(15000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 169 IF ~PartyGoldGT(14999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",10) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(15000) DestroyGold(15000) TakePartyItemNum("blun23",1) DestroyItem("blun23") TakePartyItemNum("blun24",1) DestroyItem("blun24") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 169 END IF ~~ THEN BEGIN 169 // from: 168.2 168.0 167.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 END IF ~~ THEN BEGIN 170 // from: 475.27 471.27 467.27 463.27 459.27 445.26 441.26 437.26 433.26 428.26 424.26 420.26 416.26 400.26 389.26 378.26 373.26 329.25 318.25 314.25 310.25 306.25 300.25 296.25 292.25 288.25 284.25 280.25 276.25 272.25 268.25 264.25 260.25 255.25 251.25 247.25 243.25 239.25 235.25 231.25 227.25 223.25 219.25 215.25 211.25 207.25 202.25 198.25 194.25 190.25 185.25 181.25 177.25 13.27 SAY #187640 /* ~Have ye been dealng with the local thieves' guild? Anyway, I'm sure I could do summin' with these boots of Stealth...~ */ IF ~PartyHasItem("boot02") OR(2) !PartyHasItem("boot01") !PartyHasItem("misc45") ~ THEN GOTO 171 IF ~PartyHasItem("boot02") PartyHasItem("boot01") PartyHasItem("misc45") ~ THEN GOTO 172 END IF ~~ THEN BEGIN 171 // from: 170.0 SAY #187641 /* ~Aye, I could cobble together the Boots of Speed and these Boots of Stealth. I'd need a Rogue Stone as a reagent and 10,000 gold for the job.~ */ IF ~~ THEN GOTO 173 END IF ~~ THEN BEGIN 172 // from: 170.1 SAY #187642 /* ~Aye, I could cobble together your Boots of Speed and these Boots of Stealth. You'd be fast as lightning with that footwear! I'd need a Rogue Stone as a reagent and 10,000 gold for the job. Tell me if yer interested.~ */ IF ~PartyGoldLT(10000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 173 IF ~PartyGoldGT(9999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",5) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(10000) DestroyGold(10000) TakePartyItemNum("boot02",1) DestroyItem("boot02") TakePartyItemNum("boot01",1) DestroyItem("boot01") TakePartyItemNum("misc45",1) DestroyItem("misc45") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 173 END IF ~~ THEN BEGIN 173 // from: 172.2 172.0 171.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 END IF ~~ THEN BEGIN 174 // from: 475.28 471.28 467.28 463.28 459.28 445.27 441.27 437.27 433.27 428.27 424.27 420.27 416.27 400.27 389.27 378.27 373.27 329.26 318.26 314.26 310.26 306.26 300.26 296.26 292.26 288.26 284.26 280.26 276.26 272.26 268.26 264.26 260.26 255.26 251.26 247.26 243.26 239.26 235.26 231.26 227.26 223.26 219.26 215.26 211.26 207.26 202.26 198.26 194.26 190.26 185.26 181.26 13.28 SAY #187643 /* ~The last time I saw boots like these were with those junkies from Icewind Dale. I'm sure I did summin' for 'em...~ */ IF ~PartyHasItem("boot03") OR(2) !PartyHasItem("boot01") !PartyHasItem("misc45") ~ THEN GOTO 175 IF ~PartyHasItem("boot03") PartyHasItem("boot01") PartyHasItem("misc45") ~ THEN GOTO 176 END IF ~~ THEN BEGIN 175 // from: 174.0 SAY #187644 /* ~Aye, I could cobble together the Boots of Speed and these Boots of the North. I'd need a Rogue Stone as a reagent and 10,000 gold for the job.~ */ IF ~~ THEN GOTO 177 END IF ~~ THEN BEGIN 176 // from: 174.1 SAY #187645 /* ~Aye, I could cobble together your Boots of Speed and these Boots of the North. You'd be fast as lightning with that footwear! I'd need a Rogue Stone as a reagent and 10,000 gold for the job. Tell me if yer interested.~ */ IF ~PartyGoldLT(10000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 177 IF ~PartyGoldGT(9999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",6) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(10000) DestroyGold(10000) TakePartyItemNum("boot03",1) DestroyItem("boot03") TakePartyItemNum("boot01",1) DestroyItem("boot01") TakePartyItemNum("misc45",1) DestroyItem("misc45") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 177 END IF ~~ THEN BEGIN 177 // from: 176.2 176.0 175.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 END IF ~~ THEN BEGIN 178 // from: 475.29 471.29 467.29 463.29 459.29 445.28 441.28 437.28 433.28 428.28 424.28 420.28 416.28 400.28 389.28 378.28 373.28 329.27 318.27 314.27 310.27 306.27 300.27 296.27 292.27 288.27 284.27 280.27 276.27 272.27 268.27 264.27 260.27 255.27 251.27 247.27 243.27 239.27 235.27 231.27 227.27 223.27 219.27 215.27 211.27 207.27 202.27 198.27 194.27 190.27 185.27 13.29 SAY #187646 /* ~Ah yes, the Boots of Avoidance - perfect for those run-ins with the elves...~ */ IF ~PartyHasItem("boot04") OR(2) !PartyHasItem("boot01") !PartyHasItem("misc45") ~ THEN GOTO 179 IF ~PartyHasItem("boot04") PartyHasItem("boot01") PartyHasItem("misc45") ~ THEN GOTO 180 END IF ~~ THEN BEGIN 179 // from: 178.0 SAY #187647 /* ~Aye, I could cobble together the Boots of Speed and these Boots of Avoidance. I'd need a Rogue Stone as a reagent and 20,000 gold for the job.~ */ IF ~~ THEN GOTO 181 END IF ~~ THEN BEGIN 180 // from: 178.1 SAY #187648 /* ~Aye, I could cobble together your Boots of Speed and these Boots of Avoidance. You'd be fast as lightning with that footwear! I'd need a Rogue Stone as a reagent and 20,000 gold for the job. Tell me if yer interested.~ */ IF ~PartyGoldLT(10000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 181 IF ~PartyGoldGT(9999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",8) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(10000) DestroyGold(10000) TakePartyItemNum("boot04",1) DestroyItem("boot04") TakePartyItemNum("boot01",1) DestroyItem("boot01") TakePartyItemNum("misc45",1) DestroyItem("misc45") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 181 END IF ~~ THEN BEGIN 181 // from: 180.2 180.0 179.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 END IF ~~ THEN BEGIN 182 // from: 475.30 471.30 467.30 463.30 459.30 445.29 441.29 437.29 433.29 428.29 424.29 420.29 416.29 400.29 389.29 378.29 373.29 329.28 318.28 314.28 310.28 306.28 300.28 296.28 292.28 288.28 284.28 280.28 276.28 272.28 268.28 264.28 260.28 255.28 251.28 247.28 243.28 239.28 235.28 231.28 227.28 223.28 219.28 215.28 211.28 207.28 202.28 198.28 194.28 190.28 13.30 SAY #187649 /* ~Boots of Grounding eh? I could do something with them...~ */ IF ~PartyHasItem("boot05") OR(2) !PartyHasItem("boot01") !PartyHasItem("misc45") ~ THEN GOTO 183 IF ~PartyHasItem("boot05") PartyHasItem("boot01") PartyHasItem("misc45") ~ THEN GOTO 184 END IF ~~ THEN BEGIN 183 // from: 182.0 SAY #187650 /* ~Aye, I could cobble together the Boots of Speed and these Boots of Grounding. I'd need a Rogue Stone as a reagent and 10,000 gold for the job.~ */ IF ~~ THEN GOTO 185 END IF ~~ THEN BEGIN 184 // from: 182.1 SAY #187651 /* ~Aye, I could cobble together your Boots of Speed and these Boots of Grounding. You'd be fast as lightning with that footwear! I'd need a Rogue Stone as a reagent and 10,000 gold for the job. Tell me if yer interested.~ */ IF ~PartyGoldLT(10000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 185 IF ~PartyGoldGT(9999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",7) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(10000) DestroyGold(10000) TakePartyItemNum("boot05",1) DestroyItem("boot05") TakePartyItemNum("boot01",1) DestroyItem("boot01") TakePartyItemNum("misc45",1) DestroyItem("misc45") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 185 END IF ~~ THEN BEGIN 185 // from: 184.2 184.0 183.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 END IF ~~ THEN BEGIN 186 // from: 475.31 471.31 467.31 463.31 459.31 445.30 441.30 437.30 433.30 428.30 424.30 420.30 416.30 400.30 389.30 378.30 373.30 329.29 318.29 314.29 310.29 306.29 300.29 296.29 292.29 288.29 284.29 280.29 276.29 272.29 268.29 264.29 260.29 255.29 251.29 247.29 243.29 239.29 235.29 231.29 227.29 223.29 219.29 215.29 211.29 207.29 202.29 198.29 194.29 13.31 SAY #187652 /* ~A fine bow ye got there. Lemme have a look...~ */ IF ~PartyHasItem("bow10") PartyHasItem("bow19b") PartyHasItem("potn41") NumItemsPartyGT("amul12",3) ~ THEN GOTO 188 IF ~PartyHasItem("bow10") PartyHasItem("compon10") PartyHasItem("potn41") NumItemsPartyGT("amul12",3) ~ THEN GOTO 189 IF ~PartyHasItem("bow10") OR(4) !PartyHasItem("bow19b") !PartyHasItem("compon10") !PartyHasItem("potn41") NumItemsPartyLT("amul12",4) ~ THEN GOTO 187 END IF ~~ THEN BEGIN 187 // from: 186.2 SAY #187653 /* ~The Heartseeker could be restrung with the bowstring of Gesen or Gond. With 4 Laeral's Tears and a Potion of Power as reagents I could make for ye a longbow that did not require earthly arrows.~ */ IF ~~ THEN GOTO 190 END IF ~~ THEN BEGIN 188 // from: 186.0 SAY #187654 /* ~The Heartseeker could be restrung with the bowstring of Gesen. With 4 Laeral's Tears and a Potion of Power as reagents I could make for ye a longbow that did not require earthly arrows. Dunna' worry about the gold. Them gems will pay fer themselves. Do ye be interested?~ */ IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 190 IF ~~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",12) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyItemNum("bow10",1) DestroyItem("bow10") TakePartyItemNum("bow19b",1) DestroyItem("bow19b") TakePartyItemNum("potn41",1) DestroyItem("potn41") TakePartyItemNum("amul12",1) DestroyItem("amul12") TakePartyItemNum("amul12",1) DestroyItem("amul12") TakePartyItemNum("amul12",1) DestroyItem("amul12") TakePartyItemNum("amul12",1) DestroyItem("amul12") ~ GOTO 56 END IF ~~ THEN BEGIN 189 // from: 186.1 SAY #187655 /* ~The Heartseeker could be restrung with the bowstring of Gond. With 4 Laeral's Tears and a Potion of Power as reagents I could make for ye a longbow that did not require earthly arrows. Dunna' worry about the gold. Them gems will pay fer themselves. Do ye be interested?~ */ IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 190 IF ~~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",12) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyItemNum("bow10",1) DestroyItem("bow10") TakePartyItemNum("compon10",1) DestroyItem("compon10") TakePartyItemNum("potn41",1) DestroyItem("potn41") TakePartyItemNum("amul12",1) DestroyItem("amul12") TakePartyItemNum("amul12",1) DestroyItem("amul12") TakePartyItemNum("amul12",1) DestroyItem("amul12") TakePartyItemNum("amul12",1) DestroyItem("amul12") ~ GOTO 56 END IF ~~ THEN BEGIN 190 // from: 189.0 188.0 187.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 END IF ~~ THEN BEGIN 191 // from: 475.32 471.32 467.32 463.32 459.32 445.31 441.31 437.31 433.31 428.31 424.31 420.31 416.31 400.31 389.31 378.31 373.31 329.30 318.30 314.30 310.30 306.30 300.30 296.30 292.30 288.30 284.30 280.30 276.30 272.30 268.30 264.30 260.30 255.30 251.30 247.30 243.30 239.30 235.30 231.30 227.30 223.30 219.30 215.30 211.30 207.30 202.30 198.30 13.32 SAY #187656 /* ~A thieving expert are we? Well, I have the perfect recipe for ye...~ */ IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") NumItemsPartyLT("ring06",2) ~ THEN GOTO 192 IF ~PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") NumItemsPartyGT("ring06",1) ~ THEN GOTO 193 END IF ~~ THEN BEGIN 192 // from: 191.0 SAY #187657 /* ~Ah. Should you manage to acquire the Gloves of Pick Pocketing, Bracers of Defense, Rings of Danger Sense and Lock Picking, and two Rings of Protection, I could cobble them all together for ye. 5,000 gold would cover me expenses.~ */ IF ~~ THEN GOTO 194 END IF ~~ THEN BEGIN 193 // from: 191.1 SAY #187658 /* ~Ah. Should you manage to acquire the Gloves of Pick Pocketing, Bracers of Defense, Rings of Danger Sense and Lock Picking, and two Rings of Protection, I could cobble them all together for ye. 5,000 gold would cover me expenses. What say ye?~ */ IF ~PartyGoldLT(5000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 194 IF ~PartyGoldGT(4999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",34) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(5000) DestroyGold(5000) TakePartyItemNum("brac17",1) DestroyItem("brac17") TakePartyItemNum("brac14",1) DestroyItem("brac14") TakePartyItemNum("ring35",1) DestroyItem("ring35") TakePartyItemNum("ring36",1) DestroyItem("ring36") TakePartyItemNum("ring06",1) DestroyItem("ring06") TakePartyItemNum("ring06",1) DestroyItem("ring06") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 194 END IF ~~ THEN BEGIN 194 // from: 193.2 193.0 192.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 END IF ~~ THEN BEGIN 195 // from: 475.33 471.33 467.33 463.33 459.33 445.32 441.32 437.32 433.32 428.32 424.32 420.32 416.32 400.32 389.32 378.32 373.32 329.31 318.31 314.31 310.31 306.31 300.31 296.31 292.31 288.31 284.31 280.31 276.31 272.31 268.31 264.31 260.31 255.31 251.31 247.31 243.31 239.31 235.31 231.31 227.31 223.31 219.31 215.31 211.31 207.31 202.31 13.33 SAY #187659 /* ~Very few dwarves hold the knowledge to tinker with elvish craft. Magic and muscle don't mix very easy. Fortunately, ye speak to one dwarf who knows his elves...~ */ IF ~PartyHasItem("chan14") OR(3) !PartyHasItem("scaler") NumItemsPartyLT("misc22",3) NumItemsPartyLT("scrl1e",3) ~ THEN GOTO 196 IF ~PartyHasItem("chan14") PartyHasItem("scaler") NumItemsPartyGT("misc22",2) NumItemsPartyGT("scrl1e",2) ~ THEN GOTO 197 END IF ~~ THEN BEGIN 196 // from: 195.0 SAY #187660 /* ~I might forge together a suit of Sylvan Chain with the scales of a beast of the dread flame. With three gems of Andar and 3 Fire Agates to contain the inferno and 25,000 for reagents and labor, I could make ye a mighty powerful suit.~ */ IF ~~ THEN GOTO 198 END IF ~~ THEN BEGIN 197 // from: 195.1 SAY #187661 /* ~I might forge together a suit of Sylvan Chain with the scales of a beast of the dread flame. With three gems of Andar and 3 Fire Agates to contain the inferno and 25,000 for reagents and labor, I could make ye a mighty powerful suit. Interested?~ */ IF ~PartyGoldLT(25000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 198 IF ~PartyGoldGT(24999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",39) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(25000) DestroyGold(25000) TakePartyItemNum("chan14",1) DestroyItem("chan14") TakePartyItemNum("scaler",1) DestroyItem("scaler") TakePartyItemNum("misc22",1) DestroyItem("misc22") TakePartyItemNum("misc22",1) DestroyItem("misc22") TakePartyItemNum("misc22",1) DestroyItem("misc22") TakePartyItemNum("misc16",1) DestroyItem("misc16") TakePartyItemNum("misc16",1) DestroyItem("misc16") TakePartyItemNum("misc16",1) DestroyItem("misc16") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 198 END IF ~~ THEN BEGIN 198 // from: 197.2 197.0 196.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 END IF ~~ THEN BEGIN 199 // from: 475.34 471.34 467.34 463.34 459.34 445.33 441.33 437.33 433.33 428.33 424.33 420.33 416.33 400.33 389.33 378.33 373.33 329.32 318.32 314.32 310.32 306.32 300.32 296.32 292.32 288.32 284.32 280.32 276.32 272.32 268.32 264.32 260.32 255.32 251.32 247.32 243.32 239.32 235.32 231.32 227.32 223.32 219.32 215.32 211.32 207.32 13.34 SAY #187662 /* ~A wily dagger. Let me see...~ */ IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") NumItemsPartyLT("potn36",4) ~ THEN GOTO 200 IF ~PartyHasItem("dagg14") PartyHasItem("dagg13") NumItemsPartyGT("potn36",3) ~ THEN GOTO 201 END IF ~~ THEN BEGIN 200 // from: 199.0 SAY #187663 /* ~Yes, that's quite a knife you have there. I could forge the Bone Blade and Pixie Prick together using four potions of Master Thievery as reagents and make a truly wicked blade for a thief. I'll take 15,000 gold for the deed.~ */ IF ~~ THEN GOTO 202 END IF ~~ THEN BEGIN 201 // from: 199.1 SAY #187664 /* ~Yes, that's quite a knife you have there. I could forge the Bone Blade and Pixie Prick together using four potions of Master Thievery as reagents and make a truly wicked blade for a thief. Would it be worth 15,000 gold to you?~ */ IF ~PartyGoldLT(20000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 202 IF ~PartyGoldGT(19999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",32) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(20000) DestroyGold(20000) TakePartyItemNum("dagg14",1) DestroyItem("dagg14") TakePartyItemNum("dagg13",1) DestroyItem("dagg13") TakePartyItemNum("potn36",1) DestroyItem("potn36") TakePartyItemNum("potn36",1) DestroyItem("potn36") TakePartyItemNum("potn36",1) DestroyItem("potn36") TakePartyItemNum("potn36",1) DestroyItem("potn36") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 202 END IF ~~ THEN BEGIN 202 // from: 201.2 201.0 200.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 END IF ~~ THEN BEGIN 203 // from: 475.35 471.35 467.35 463.35 459.35 445.34 441.34 437.34 433.34 428.34 424.34 420.34 416.34 400.34 389.34 378.34 373.34 329.33 318.33 314.33 310.33 306.33 300.33 296.33 292.33 288.33 284.33 280.33 276.33 272.33 268.33 264.33 260.33 255.33 251.33 247.33 243.33 239.33 235.33 231.33 227.33 223.33 219.33 215.33 211.33 13.35 SAY #187665 /* ~So, this pansy can fight as well eh? Sorry boy, but 'tis true that appearances can be decieving. Heh heh...~ */ IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") PartyHasItem("sw1h26") PartyHasItem("sw1h27") PartyHasItem("misc45") PartyHasItem("scrl5p") PartyHasItem("scrl5i") PartyHasItem("dagg16") ~ THEN GOTO 205 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") PartyHasItem("sw1h26") PartyHasItem("sw1h27") PartyHasItem("misc45") PartyHasItem("scrl5p") PartyHasItem("scrl5w") PartyHasItem("dagg16") ~ THEN GOTO 206 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") OR(7) !PartyHasItem("sw1h26") !PartyHasItem("sw1h27") !PartyHasItem("misc45") !PartyHasItem("scrl5p") !PartyHasItem("scrl5i") !PartyHasItem("dagg16") !PartyHasItem("scrl5w") ~ THEN GOTO 204 END IF ~~ THEN BEGIN 204 // from: 203.2 SAY #187666 /* ~Ah, I've never tried to upgrade Planar weapons. Very dangerous work, that. Hmmm, let's see. If you don't mind sacrificing the swords of Ilbratha and Arbane, I can reforge Haer'Dalis' short swords so that they will inflict more damage and gain some spell-like powers. It will cost you 25,000 in gold, plus a Rogue Stone and scrolls of Chaos and Greater Malison.~ */ IF ~~ THEN GOTO 207 END IF ~~ THEN BEGIN 205 // from: 203.0 SAY #187667 /* ~Ah, I've never tried to upgrade Planar weapons. Very dangerous work, that. Hmmm, let's see. If you don't mind sacrificing the swords of Ilbratha and Arbane, I can reforge Haer'Dalis' short swords so that they will inflict more damage and gain some spell-like powers. It will cost you 25,000 in gold, plus a Rogue Stone and scrolls of Chaos and Greater Malison. Are ye interested?~ */ IF ~PartyGoldLT(25000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 207 IF ~PartyGoldGT(24999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",43) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(25000) DestroyGold(25000) TakePartyItemNum("npsw05",1) DestroyItem("npsw05") TakePartyItemNum("npsw06",1) DestroyItem("npsw06") TakePartyItemNum("sw1h26",1) DestroyItem("sw1h26") TakePartyItemNum("sw1h27",1) DestroyItem("sw1h27") TakePartyItemNum("misc45",1) DestroyItem("misc45") TakePartyItemNum("scrl5p",1) DestroyItem("scrl5p") TakePartyItemNum("scrl5i",1) DestroyItem("scrl5i") TakePartyItemNum("dagg16",5) DestroyItem("dagg16") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 207 END IF ~~ THEN BEGIN 206 // from: 203.1 SAY #187667 /* ~Ah, I've never tried to upgrade Planar weapons. Very dangerous work, that. Hmmm, let's see. If you don't mind sacrificing the swords of Ilbratha and Arbane, I can reforge Haer'Dalis' short swords so that they will inflict more damage and gain some spell-like powers. It will cost you 25,000 in gold, plus a Rogue Stone and scrolls of Chaos and Greater Malison. Are ye interested?~ */ IF ~PartyGoldLT(25000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 207 IF ~PartyGoldGT(24999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",43) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(25000) DestroyGold(25000) TakePartyItemNum("npsw05",1) DestroyItem("npsw05") TakePartyItemNum("npsw06",1) DestroyItem("npsw06") TakePartyItemNum("sw1h26",1) DestroyItem("sw1h26") TakePartyItemNum("sw1h27",1) DestroyItem("sw1h27") TakePartyItemNum("misc45",1) DestroyItem("misc45") TakePartyItemNum("scrl5p",1) DestroyItem("scrl5p") TakePartyItemNum("scrl5w",1) DestroyItem("scrl5w") TakePartyItemNum("dagg16",5) DestroyItem("dagg16") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 207 END IF ~~ THEN BEGIN 207 // from: 206.2 206.0 205.2 205.0 204.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 END IF ~~ THEN BEGIN 208 // from: 475.36 471.36 467.36 463.36 459.36 445.35 441.35 437.35 433.35 428.35 424.35 420.35 416.35 400.35 389.35 378.35 373.35 329.34 318.34 314.34 310.34 306.34 300.34 296.34 292.34 288.34 284.34 280.34 276.34 272.34 268.34 264.34 260.34 255.34 251.34 247.34 243.34 239.34 235.34 231.34 227.34 223.34 219.34 215.34 13.36 SAY #187668 /* ~Hmm, methinks this Helm of Defense could be improved...~ */ IF ~PartyHasItem("helm04") OR(2) !PartyHasItem("helm06") NumItemsPartyLT("misc36",4) ~ THEN GOTO 209 IF ~PartyHasItem("helm04") PartyHasItem("helm06") NumItemsPartyGT("misc36",3) ~ THEN GOTO 210 END IF ~~ THEN BEGIN 209 // from: 208.0 SAY #187669 /* ~Certainly. I could combine the defensive powers of a Helm of Defense and a Helm of Charm Protection. I'd need four pearls as reagents and 10,000 gold for the job.~ */ IF ~~ THEN GOTO 211 END IF ~~ THEN BEGIN 210 // from: 208.1 SAY #187670 /* ~Certainly. I could combine the defensive powers of a Helm of Defense and a Helm of Charm Protection. I'd need four pearls as reagents and 10,000 gold for the job. Ye want me ta go ahead?~ */ IF ~PartyGoldLT(10000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 211 IF ~PartyGoldGT(9999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",17) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(10000) DestroyGold(10000) TakePartyItemNum("helm04",1) DestroyItem("helm04") TakePartyItemNum("helm06",1) DestroyItem("helm06") TakePartyItemNum("misc36",1) DestroyItem("misc36") TakePartyItemNum("misc36",1) DestroyItem("misc36") TakePartyItemNum("misc36",1) DestroyItem("misc36") TakePartyItemNum("misc36",1) DestroyItem("misc36") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 211 END IF ~~ THEN BEGIN 211 // from: 210.2 210.0 209.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 END IF ~~ THEN BEGIN 212 // from: 475.37 471.37 467.37 463.37 459.37 445.36 441.36 437.36 433.36 428.36 424.36 420.36 416.36 400.36 389.36 378.36 373.36 329.35 318.35 314.35 310.35 306.35 300.35 296.35 292.35 288.35 284.35 280.35 276.35 272.35 268.35 264.35 260.35 255.35 251.35 247.35 243.35 239.35 235.35 231.35 227.35 223.35 219.35 13.37 SAY #187671 /* ~A Helm of Charm Protection? It has a gaping weakness... and I know how ta fix it...~ */ IF ~PartyHasItem("helm06") NumItemsPartyLT("misc9y",2) ~ THEN GOTO 213 IF ~PartyHasItem("helm06") NumItemsPartyGT("misc9y",1) ~ THEN GOTO 214 END IF ~~ THEN BEGIN 213 // from: 212.0 SAY #187672 /* ~Hmm. If you managed to procure two flasks of Mind Flayer birthing brine I could use them to enchant a Helm of Charm Protection against Psionics. I'd charge 10,000 for the job.~ */ IF ~~ THEN GOTO 215 END IF ~~ THEN BEGIN 214 // from: 212.1 SAY #187673 /* ~Hmm. If you managed to procure two flasks of Mind Flayer birthing brine I could use them to enchant a Helm of Charm Protection against Psionics. I'd charge 10,000 for the job. What say ye?~ */ IF ~PartyGoldLT(10000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 215 IF ~PartyGoldGT(9999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",18) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(10000) DestroyGold(10000) TakePartyItemNum("helm06",1) DestroyItem("helm06") TakePartyItemNum("misc9y",1) DestroyItem("misc9y") TakePartyItemNum("misc9y",1) DestroyItem("misc9y") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 215 END IF ~~ THEN BEGIN 215 // from: 214.2 214.0 213.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~PartyHasItem("helm04") ~ THEN GOTO 208 END IF ~~ THEN BEGIN 216 // from: 475.38 471.38 467.38 463.38 459.38 445.37 441.37 437.37 433.37 428.37 424.37 420.37 416.37 400.37 389.37 378.37 373.37 329.36 318.36 314.36 310.36 306.36 300.36 296.36 292.36 288.36 284.36 280.36 276.36 272.36 268.36 264.36 260.36 255.36 251.36 247.36 243.36 239.36 235.36 231.36 227.36 223.36 13.38 SAY #187674 /* ~Hmm, this is some very tough leather. Almost as good as chainmail...~ */ IF ~PartyHasItem("leat20") !PartyHasItem("scrl8e") ~ THEN GOTO 217 IF ~PartyHasItem("leat20") PartyHasItem("scrl8e") ~ THEN GOTO 218 END IF ~~ THEN BEGIN 217 // from: 216.0 SAY #187675 /* ~With a Scroll of Protection from the Elements to use as a catalyst, I could make that old bear's hide even tougher and smellier than it already is. I'd charge 15,000 for me labour.~ */ IF ~~ THEN GOTO 219 END IF ~~ THEN BEGIN 218 // from: 216.1 SAY #187676 /* ~With a Scroll of Protection from the Elements to use as a catalyst, I could make that old bear's hide even tougher and smellier than it already is. I'd charge 15,000 for me labour. Interested?~ */ IF ~PartyGoldLT(15000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 219 IF ~PartyGoldGT(14999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",19) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(15000) DestroyGold(15000) TakePartyItemNum("leat20",1) DestroyItem("leat20") TakePartyItemNum("scrl8e",1) DestroyItem("scrl8e") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 219 END IF ~~ THEN BEGIN 219 // from: 218.2 218.0 217.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~PartyHasItem("helm04") ~ THEN GOTO 208 IF ~PartyHasItem("helm06") ~ THEN GOTO 212 END IF ~~ THEN BEGIN 220 // from: 475.39 471.39 467.39 463.39 459.39 445.38 441.38 437.38 433.38 428.38 424.38 420.38 416.38 400.38 389.38 378.38 373.38 329.37 318.37 314.37 310.37 306.37 300.37 296.37 292.37 288.37 284.37 280.37 276.37 272.37 268.37 264.37 260.37 255.37 251.37 247.37 243.37 239.37 235.37 231.37 227.37 13.39 SAY #187677 /* ~This paladin's armor. It could use some reforging...~ */ IF ~PartyHasItem("npplat") !PartyHasItem("plat16") ~ THEN GOTO 221 IF ~PartyHasItem("npplat") PartyHasItem("plat16") ~ THEN GOTO 222 END IF ~~ THEN BEGIN 221 // from: 220.0 SAY #187678 /* ~With some choice plates from the Armor of the Hart I could reforge the Firecam Full-Plate. But quality doesn't come cheap: I'd ask 20,000 gold for the work.~ */ IF ~~ THEN GOTO 223 END IF ~~ THEN BEGIN 222 // from: 220.1 SAY #187679 /* ~With some choice plates from the Armor of the Hart I could reforge the Firecam Full-Plate. But quality doesn't come cheap: I'd ask 20,000 gold for the work. And that's final.~ */ IF ~PartyGoldLT(20000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 223 IF ~PartyGoldGT(19999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",20) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(20000) DestroyGold(20000) TakePartyItemNum("npplat",1) DestroyItem("npplat") TakePartyItemNum("plat16",1) DestroyItem("plat16") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 223 END IF ~~ THEN BEGIN 223 // from: 222.2 222.0 221.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~PartyHasItem("helm04") ~ THEN GOTO 208 IF ~PartyHasItem("helm06") ~ THEN GOTO 212 IF ~PartyHasItem("leat20") ~ THEN GOTO 216 END IF ~~ THEN BEGIN 224 // from: 475.40 471.40 467.40 463.40 459.40 445.39 441.39 437.39 433.39 428.39 424.39 420.39 416.39 400.39 389.39 378.39 373.39 329.38 318.38 314.38 310.38 306.38 300.38 296.38 292.38 288.38 284.38 280.38 276.38 272.38 268.38 264.38 260.38 255.38 251.38 247.38 243.38 239.38 235.38 231.38 13.40 SAY #187680 /* ~Hmm, a blade that yearns to be like the Holy Avenger...~ */ IF ~PartyHasItem("npsw03") OR(3) !PartyHasItem("misc6m") NumItemsPartyLT("scrl1e",5) !Reputation(Player1,20) ~ THEN GOTO 225 IF ~PartyHasItem("npsw03") PartyHasItem("misc6m") NumItemsPartyGT("scrl1e",4) Reputation(Player1,20) ~ THEN GOTO 226 END IF ~~ THEN BEGIN 225 // from: 224.0 SAY #187681 /* ~Ah, the Hallowed Redeemer. A holy blade, if a minor one by local standards. With a Demon Heart and five scrolls that Dispel Magic I could reforge it into something stronger still. But I'd need Torm's blessing for the task, so I could only undertake the job for a group of the highest virtue and reputation. I'd charge 15,000 gold.~ */ IF ~~ THEN GOTO 227 END IF ~~ THEN BEGIN 226 // from: 224.1 SAY #187682 /* ~Ah, the Hallowed Redeemer. A holy blade, if a minor one by local standards. With a Demon Heart and five scrolls that Dispel Magic I could reforge it into something stronger still. But I'd need Torm's blessing for the task, so I could only undertake the job for a group of the highest virtue and reputation. I'd charge 15,000 gold. Tell me if yer interested.~ */ IF ~PartyGoldLT(15000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 227 IF ~PartyGoldGT(14999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",29) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(15000) DestroyGold(15000) TakePartyItemNum("npsw03",1) DestroyItem("npsw03") TakePartyItemNum("misc6m",1) DestroyItem("misc6m") TakePartyItemNum("scrl1e",1) DestroyItem("scrl1e") TakePartyItemNum("scrl1e",1) DestroyItem("scrl1e") TakePartyItemNum("scrl1e",1) DestroyItem("scrl1e") TakePartyItemNum("scrl1e",1) DestroyItem("scrl1e") TakePartyItemNum("scrl1e",1) DestroyItem("scrl1e") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 227 END IF ~~ THEN BEGIN 227 // from: 226.2 226.0 225.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~PartyHasItem("helm04") ~ THEN GOTO 208 IF ~PartyHasItem("helm06") ~ THEN GOTO 212 IF ~PartyHasItem("leat20") ~ THEN GOTO 216 IF ~PartyHasItem("npplat") ~ THEN GOTO 220 END IF ~~ THEN BEGIN 228 // from: 475.41 471.41 467.41 463.41 459.41 445.40 441.40 437.40 433.40 428.40 424.40 420.40 416.40 400.40 389.40 378.40 373.40 329.39 318.39 314.39 310.39 306.39 300.39 296.39 292.39 288.39 284.39 280.39 276.39 272.39 268.39 264.39 260.39 255.39 251.39 247.39 243.39 239.39 235.39 13.41 SAY #187683 /* ~Well I'll be damned. Ye have one a those spider figurines the blasted drow carry around...~ */ IF ~PartyHasItem("misc3e") OR(3) !PartyHasItem("scrl6r") !PartyHasItem("scrl99") NumItemsPartyLT("dagg16",5) ~ THEN GOTO 229 IF ~PartyHasItem("misc3e") PartyHasItem("scrl6r") PartyHasItem("scrl99") NumItemsPartyGT("dagg16",4) ~ THEN GOTO 230 END IF ~~ THEN BEGIN 229 // from: 228.0 SAY #187684 /* ~Ye'd be better off asking a drow magician than this dwarf to reforge a spider for ye, but I can do it. I won't enjoy it, but I can do it. I'll need some special reagents for the reforging: scrolls of Spider Spawn and Web; five poisoned throwing daggers; and 5,000 gold.~ */ IF ~~ THEN GOTO 231 END IF ~~ THEN BEGIN 230 // from: 228.1 SAY #187685 /* ~Ye'd be better off asking a drow magician than this dwarf to reforge a spider for ye, but I can do it. I won't enjoy it, but I can do it. I'll need some special reagents for the reforging: scrolls of Spider Spawn and Web; five poisoned throwing daggers; and 5,000 gold. Are ye still interested?~ */ IF ~PartyGoldLT(5000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 231 IF ~PartyGoldGT(4999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",40) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(5000) DestroyGold(5000) TakePartyItemNum("misc3e",1) DestroyItem("misc3e") TakePartyItemNum("scrl6r",1) DestroyItem("scrl6r") TakePartyItemNum("scrl99",1) DestroyItem("scrl99") TakePartyItemNum("dagg16",1) DestroyItem("dagg16") TakePartyItemNum("dagg16",1) DestroyItem("dagg16") TakePartyItemNum("dagg16",1) DestroyItem("dagg16") TakePartyItemNum("dagg16",1) DestroyItem("dagg16") TakePartyItemNum("dagg16",1) DestroyItem("dagg16") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 231 END IF ~~ THEN BEGIN 231 // from: 230.2 230.0 229.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~PartyHasItem("helm04") ~ THEN GOTO 208 IF ~PartyHasItem("helm06") ~ THEN GOTO 212 IF ~PartyHasItem("leat20") ~ THEN GOTO 216 IF ~PartyHasItem("npplat") ~ THEN GOTO 220 IF ~PartyHasItem("npsw03") ~ THEN GOTO 224 END IF ~~ THEN BEGIN 232 // from: 475.42 471.42 467.42 463.42 459.42 445.41 441.41 437.41 433.41 428.41 424.41 420.41 416.41 400.41 389.41 378.41 373.41 329.40 318.40 314.40 310.40 306.40 300.40 296.40 292.40 288.40 284.40 280.40 276.40 272.40 268.40 264.40 260.40 255.40 251.40 247.40 243.40 239.40 13.42 SAY #187686 /* ~Now this is something ye don't see too often. A littlefolk paladin? But yes, her sword does show promise...~ */ IF ~PartyHasItem("npsw01") !Reputation(Player1,20) ~ THEN GOTO 233 IF ~PartyHasItem("npsw01") Reputation(Player1,20) ~ THEN GOTO 234 END IF ~~ THEN BEGIN 233 // from: 232.0 SAY #187687 /* ~Aye, I could reforge the Sword of Arvoreen. But not without the blessing of the Goddess herself: I could only do the task for a party of the purest heart and highest reputation. I'd charge 15,000 for the job.~ */ IF ~~ THEN GOTO 235 END IF ~~ THEN BEGIN 234 // from: 232.1 SAY #187688 /* ~Aye, I could reforge the Sword of Arvoreen. But not without the blessing of the Goddess herself: I could only do the task for a party of the purest heart and highest reputation. I'd charge 15,000 for the job. Should I start?~ */ IF ~PartyGoldLT(15000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 235 IF ~PartyGoldGT(14999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",28) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(15000) DestroyGold(15000) TakePartyItemNum("npsw01",1) DestroyItem("npsw01") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 235 END IF ~~ THEN BEGIN 235 // from: 234.2 234.0 233.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~PartyHasItem("helm04") ~ THEN GOTO 208 IF ~PartyHasItem("helm06") ~ THEN GOTO 212 IF ~PartyHasItem("leat20") ~ THEN GOTO 216 IF ~PartyHasItem("npplat") ~ THEN GOTO 220 IF ~PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~PartyHasItem("misc3e") ~ THEN GOTO 228 END IF ~~ THEN BEGIN 236 // from: 475.43 471.43 467.43 463.43 459.43 445.42 441.42 437.42 433.42 428.42 424.42 420.42 416.42 400.42 389.42 378.42 373.42 329.41 318.41 314.41 310.41 306.41 300.41 296.41 292.41 288.41 284.41 280.41 276.41 272.41 268.41 264.41 260.41 255.41 251.41 247.41 243.41 13.43 SAY #187689 /* ~I remember good ol' Taerom used to forge one a these babies in his smithy. Well, some competition's always good eh?~ */ IF ~PartyHasItem("plat06") OR(2) !PartyHasItem("scrl03") !PartyHasItem("scrl6y") ~ THEN GOTO 237 IF ~PartyHasItem("plat06") PartyHasItem("scrl03") PartyHasItem("scrl6y") ~ THEN GOTO 238 END IF ~~ THEN BEGIN 237 // from: 236.0 SAY #187690 /* ~With two distinct kinds of scrolls of Protection from Acid to use for the rune-work, I could reforge a suit of Ankheg Plate Mail. It would cost you another 5,000 gold, though.~ */ IF ~~ THEN GOTO 239 END IF ~~ THEN BEGIN 238 // from: 236.1 SAY #187691 /* ~With two distinct kinds of scrolls of Protection from Acid to use for the rune-work, I could reforge a suit of Ankheg Plate Mail. It would cost you another 5,000 gold, though. What say ye?~ */ IF ~PartyGoldLT(5000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 239 IF ~PartyGoldGT(4999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",21) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(5000) DestroyGold(5000) TakePartyItemNum("plat06",1) DestroyItem("plat06") TakePartyItemNum("scrl03",1) DestroyItem("scrl03") TakePartyItemNum("scrl6y",1) DestroyItem("scrl6y") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 239 END IF ~~ THEN BEGIN 239 // from: 238.2 238.0 237.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~PartyHasItem("helm04") ~ THEN GOTO 208 IF ~PartyHasItem("helm06") ~ THEN GOTO 212 IF ~PartyHasItem("leat20") ~ THEN GOTO 216 IF ~PartyHasItem("npplat") ~ THEN GOTO 220 IF ~PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~PartyHasItem("npsw01") ~ THEN GOTO 232 END IF ~~ THEN BEGIN 240 // from: 475.44 471.44 467.44 463.44 459.44 445.43 441.43 437.43 433.43 428.43 424.43 420.43 416.43 400.43 389.43 378.43 373.43 329.42 318.42 314.42 310.42 306.42 300.42 296.42 292.42 288.42 284.42 280.42 276.42 272.42 268.42 264.42 260.42 255.42 251.42 247.42 13.44 SAY #187692 /* ~Good lookin' ring ye got there. Lemme have a look...~ */ IF ~PartyHasItem("ring06") OR(2) !PartyHasItem("ring31") !PartyHasItem("misc42") ~ THEN GOTO 241 IF ~PartyHasItem("ring06") PartyHasItem("ring31") PartyHasItem("misc42") ~ THEN GOTO 242 END IF ~~ THEN BEGIN 241 // from: 240.0 SAY #187693 /* ~I could combine a Ring of Protection +1 with a Ring of Regeneration. I'd need to melt a diamond into the mixture and it would cost you 10,000 gold.~ */ IF ~~ THEN GOTO 243 END IF ~~ THEN BEGIN 242 // from: 240.1 SAY #187694 /* ~I could combine a Ring of Protection +1 with a Ring of Regeneration. I'd need to melt a diamond into the mixture and it would cost you 10,000 gold. Interested?~ */ IF ~PartyGoldLT(10000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 243 IF ~PartyGoldGT(9999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",1) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(10000) DestroyGold(10000) TakePartyItemNum("ring06",1) DestroyItem("ring06") TakePartyItemNum("ring31",1) DestroyItem("ring31") TakePartyItemNum("misc42",1) DestroyItem("misc42") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 243 END IF ~~ THEN BEGIN 243 // from: 242.2 242.0 241.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~PartyHasItem("helm04") ~ THEN GOTO 208 IF ~PartyHasItem("helm06") ~ THEN GOTO 212 IF ~PartyHasItem("leat20") ~ THEN GOTO 216 IF ~PartyHasItem("npplat") ~ THEN GOTO 220 IF ~PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~PartyHasItem("plat06") ~ THEN GOTO 236 END IF ~~ THEN BEGIN 244 // from: 475.45 471.45 467.45 463.45 459.45 445.44 441.44 437.44 433.44 428.44 424.44 420.44 416.44 400.44 389.44 378.44 373.44 329.43 318.43 314.43 310.43 306.43 300.43 296.43 292.43 288.43 284.43 280.43 276.43 272.43 268.43 264.43 260.43 255.43 251.43 13.45 SAY #187692 /* ~Good lookin' ring ye got there. Lemme have a look...~ */ IF ~PartyHasItem("ring07") OR(2) !PartyHasItem("ring31") !PartyHasItem("misc42") ~ THEN GOTO 245 IF ~PartyHasItem("ring07") PartyHasItem("ring31") PartyHasItem("misc42") ~ THEN GOTO 246 END IF ~~ THEN BEGIN 245 // from: 244.0 SAY #187695 /* ~I could combine a Ring of Protection +2 with a Ring of Regeneration. I'd need to melt a diamond into the mixture and it would cost you 20,000 gold.~ */ IF ~~ THEN GOTO 247 END IF ~~ THEN BEGIN 246 // from: 244.1 SAY #187696 /* ~I could combine a Ring of Protection +2 with a Ring of Regeneration. I'd need to melt a diamond into the mixture and it would cost you 20,000 gold. Interested?~ */ IF ~PartyGoldLT(20000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 247 IF ~PartyGoldGT(19999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",2) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(20000) DestroyGold(20000) TakePartyItemNum("ring07",1) DestroyItem("ring07") TakePartyItemNum("ring31",1) DestroyItem("ring31") TakePartyItemNum("misc42",1) DestroyItem("misc42") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 247 END IF ~~ THEN BEGIN 247 // from: 246.2 246.0 245.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~PartyHasItem("helm04") ~ THEN GOTO 208 IF ~PartyHasItem("helm06") ~ THEN GOTO 212 IF ~PartyHasItem("leat20") ~ THEN GOTO 216 IF ~PartyHasItem("npplat") ~ THEN GOTO 220 IF ~PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~PartyHasItem("plat06") ~ THEN GOTO 236 IF ~PartyHasItem("ring06") ~ THEN GOTO 240 END IF ~~ THEN BEGIN 248 // from: 475.46 471.46 467.46 463.46 459.46 445.45 441.45 437.45 433.45 428.45 424.45 420.45 416.45 400.45 389.45 378.45 373.45 329.44 318.44 314.44 310.44 306.44 300.44 296.44 292.44 288.44 284.44 280.44 276.44 272.44 268.44 264.44 260.44 255.44 13.46 SAY #187697 /* ~Ah, ye have one 'a the rings of the Elements. Lets a have a look now...~ */ IF ~OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") OR(3) !PartyHasItem("scrl05") !PartyHasItem("scrl06") !PartyHasItem("scrl15") ~ THEN GOTO 249 IF ~PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") PartyHasItem("scrl05") PartyHasItem("scrl06") PartyHasItem("scrl15") ~ THEN GOTO 250 END IF ~~ THEN BEGIN 249 // from: 248.0 SAY #187698 /* ~I could combine the Rings of Air, Earth and Fire into a Ring of Elemental Mastery. I would need defensive scrolls of Protection from Petrification, Fire and Electricity as reagents. It will also cost you 20,000 gold.~ */ IF ~~ THEN GOTO 251 END IF ~~ THEN BEGIN 250 // from: 248.1 SAY #187699 /* ~I could combine the Rings of Air, Earth and Fire into a Ring of Elemental Mastery. I would need defensive scrolls of Protection from Petrification, Fire and Electricity as reagents. It will also cost you 20,000 gold. What say ye?~ */ IF ~PartyGoldLT(20000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 251 IF ~PartyGoldGT(19999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",3) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(20000) DestroyGold(20000) TakePartyItemNum("ring27",1) DestroyItem("ring27") TakePartyItemNum("ring28",1) DestroyItem("ring28") TakePartyItemNum("ring29",1) DestroyItem("ring29") TakePartyItemNum("scrl05",1) DestroyItem("scrl05") TakePartyItemNum("scrl06",1) DestroyItem("scrl06") TakePartyItemNum("scrl15",1) DestroyItem("scrl15") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 251 END IF ~~ THEN BEGIN 251 // from: 250.2 250.0 249.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~PartyHasItem("helm04") ~ THEN GOTO 208 IF ~PartyHasItem("helm06") ~ THEN GOTO 212 IF ~PartyHasItem("leat20") ~ THEN GOTO 216 IF ~PartyHasItem("npplat") ~ THEN GOTO 220 IF ~PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~PartyHasItem("plat06") ~ THEN GOTO 236 IF ~PartyHasItem("ring06") ~ THEN GOTO 240 IF ~PartyHasItem("ring07") ~ THEN GOTO 244 END IF ~~ THEN BEGIN 252 // from: 475.47 471.47 467.47 463.47 459.47 445.46 441.46 437.46 433.46 428.46 424.46 420.46 416.46 400.46 389.46 378.46 373.46 329.45 318.45 314.45 310.45 306.45 300.45 296.45 292.45 288.45 284.45 280.45 276.45 272.45 268.45 264.45 260.45 13.47 SAY #187700 /* ~These rings you be wearin' look workable. Mind if I have a look?~ */ IF ~OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") !PartyHasItem("amul16") ~ THEN GOTO 253 IF ~PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") PartyHasItem("amul16") ~ THEN GOTO 254 END IF ~~ THEN BEGIN 253 // from: 252.0 SAY #187701 /* ~Aye, though magery be not my craft, I could forge a Ring of Acuity, a Ring of Wizardry and an Amulet of Metaspell Influence into a potent memory aid for an enchanter. A Ring of Protection and 20,000 gold would finish the job.~ */ IF ~~ THEN GOTO 255 END IF ~~ THEN BEGIN 254 // from: 252.1 SAY #187702 /* ~Aye, though magery be not my craft, I could forge a Ring of Acuity, a Ring of Wizardry and an Amulet of Metaspell Influence into a potent memory aid for an enchanter. A Ring of Protection and 20,000 gold would finish the job. Interested?~ */ IF ~PartyGoldLT(20000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 255 IF ~PartyGoldGT(19999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",38) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(20000) DestroyGold(20000) TakePartyItemNum("ring08",1) DestroyItem("ring08") TakePartyItemNum("ring40",1) DestroyItem("ring40") TakePartyItemNum("ring06",1) DestroyItem("ring06") TakePartyItemNum("amul16",1) DestroyItem("amul16") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 255 END IF ~~ THEN BEGIN 255 // from: 254.2 254.0 253.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~PartyHasItem("helm04") ~ THEN GOTO 208 IF ~PartyHasItem("helm06") ~ THEN GOTO 212 IF ~PartyHasItem("leat20") ~ THEN GOTO 216 IF ~PartyHasItem("npplat") ~ THEN GOTO 220 IF ~PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~PartyHasItem("plat06") ~ THEN GOTO 236 IF ~PartyHasItem("ring06") ~ THEN GOTO 240 IF ~PartyHasItem("ring07") ~ THEN GOTO 244 IF ~OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 END IF ~~ THEN BEGIN 256 // from: 475.48 471.48 467.48 463.48 459.48 445.47 441.47 437.47 433.47 428.47 424.47 420.47 416.47 400.47 389.47 378.47 373.47 329.46 318.46 314.46 310.46 306.46 300.46 296.46 292.46 288.46 284.46 280.46 276.46 272.46 268.46 264.46 13.48 SAY #187703 /* ~A robe, and a fine one at that. Maybe I could refine it...~ */ IF ~PartyHasItem("clck15") PartyHasItem("clck01") PartyHasItem("scrl7u") PartyHasItem("scrl5k") ~ THEN GOTO 258 IF ~PartyHasItem("clck19") PartyHasItem("clck01") PartyHasItem("scrl7u") PartyHasItem("scrl5k") ~ THEN GOTO 259 IF ~OR(2) PartyHasItem("clck15") PartyHasItem("clck19") OR(3) !PartyHasItem("clck01") !PartyHasItem("scrl7u") !PartyHasItem("scrl5k") ~ THEN GOTO 257 END IF ~~ THEN BEGIN 257 // from: 256.2 SAY #187704 /* ~Yes, I could make some improvements to a Robe of the Archmagi. With a Cloak of Protection +1 and scrolls of Spirit Armor and Contingency as reagents I could make a mantle worthy of Elminster. It would cost you 20,000 gold.~ */ IF ~~ THEN GOTO 260 END IF ~~ THEN BEGIN 258 // from: 256.0 SAY #187705 /* ~Yes, I could make some improvements to a Robe of the Archmagi. With a Cloak of Protection +1 and scrolls of Spirit Armor and Contingency as reagents I could make a mantle worthy of Elminster. It would cost you 20,000 gold. Interested?~ */ IF ~PartyGoldLT(20000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 260 IF ~PartyGoldGT(19999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",14) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(20000) DestroyGold(20000) TakePartyItemNum("clck15",1) DestroyItem("clck15") TakePartyItemNum("clck01",1) DestroyItem("clck01") TakePartyItemNum("scrl7u",1) DestroyItem("scrl7u") TakePartyItemNum("scrl5k",1) DestroyItem("scrl5k") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 260 END IF ~~ THEN BEGIN 259 // from: 256.1 SAY #187705 /* ~Yes, I could make some improvements to a Robe of the Archmagi. With a Cloak of Protection +1 and scrolls of Spirit Armor and Contingency as reagents I could make a mantle worthy of Elminster. It would cost you 20,000 gold. Interested?~ */ IF ~PartyGoldLT(20000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 260 IF ~PartyGoldGT(19999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",14) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(20000) DestroyGold(20000) TakePartyItemNum("clck19",1) DestroyItem("clck19") TakePartyItemNum("clck01",1) DestroyItem("clck01") TakePartyItemNum("scrl7u",1) DestroyItem("scrl7u") TakePartyItemNum("scrl5k",1) DestroyItem("scrl5k") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 260 END IF ~~ THEN BEGIN 260 // from: 259.2 259.0 258.2 258.0 257.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~PartyHasItem("helm04") ~ THEN GOTO 208 IF ~PartyHasItem("helm06") ~ THEN GOTO 212 IF ~PartyHasItem("leat20") ~ THEN GOTO 216 IF ~PartyHasItem("npplat") ~ THEN GOTO 220 IF ~PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~PartyHasItem("plat06") ~ THEN GOTO 236 IF ~PartyHasItem("ring06") ~ THEN GOTO 240 IF ~PartyHasItem("ring07") ~ THEN GOTO 244 IF ~OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 END IF ~~ THEN BEGIN 261 // from: 475.49 471.49 467.49 463.49 459.49 445.48 441.48 437.48 433.48 428.48 424.48 420.48 416.48 400.48 389.48 378.48 373.48 329.47 318.47 314.47 310.47 306.47 300.47 296.47 292.47 288.47 284.47 280.47 276.47 272.47 268.47 13.49 SAY #187703 /* ~A robe, and a fine one at that. Maybe I could refine it...~ */ IF ~PartyHasItem("clck16") OR(3) !PartyHasItem("clck01") !PartyHasItem("scrl7u") !PartyHasItem("scrl5k") ~ THEN GOTO 262 IF ~PartyHasItem("clck16") PartyHasItem("clck01") PartyHasItem("scrl7u") PartyHasItem("scrl5k") ~ THEN GOTO 263 END IF ~~ THEN BEGIN 262 // from: 261.0 SAY #187704 /* ~Yes, I could make some improvements to a Robe of the Archmagi. With a Cloak of Protection +1 and scrolls of Spirit Armor and Contingency as reagents I could make a mantle worthy of Elminster. It would cost you 20,000 gold.~ */ IF ~~ THEN GOTO 264 END IF ~~ THEN BEGIN 263 // from: 261.1 SAY #187705 /* ~Yes, I could make some improvements to a Robe of the Archmagi. With a Cloak of Protection +1 and scrolls of Spirit Armor and Contingency as reagents I could make a mantle worthy of Elminster. It would cost you 20,000 gold. Interested?~ */ IF ~PartyGoldLT(20000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 264 IF ~PartyGoldGT(19999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",15) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(20000) DestroyGold(20000) TakePartyItemNum("clck16",1) DestroyItem("clck16") TakePartyItemNum("clck01",1) DestroyItem("clck01") TakePartyItemNum("scrl7u",1) DestroyItem("scrl7u") TakePartyItemNum("scrl5k",1) DestroyItem("scrl5k") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 264 END IF ~~ THEN BEGIN 264 // from: 263.2 263.0 262.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~PartyHasItem("helm04") ~ THEN GOTO 208 IF ~PartyHasItem("helm06") ~ THEN GOTO 212 IF ~PartyHasItem("leat20") ~ THEN GOTO 216 IF ~PartyHasItem("npplat") ~ THEN GOTO 220 IF ~PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~PartyHasItem("plat06") ~ THEN GOTO 236 IF ~PartyHasItem("ring06") ~ THEN GOTO 240 IF ~PartyHasItem("ring07") ~ THEN GOTO 244 IF ~OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 END IF ~~ THEN BEGIN 265 // from: 475.50 471.50 467.50 463.50 459.50 445.49 441.49 437.49 433.49 428.49 424.49 420.49 416.49 400.49 389.49 378.49 373.49 329.48 318.48 314.48 310.48 306.48 300.48 296.48 292.48 288.48 284.48 280.48 276.48 272.48 13.50 SAY #187703 /* ~A robe, and a fine one at that. Maybe I could refine it...~ */ IF ~PartyHasItem("clck17") OR(3) !PartyHasItem("clck01") !PartyHasItem("scrl7u") !PartyHasItem("scrl5k") ~ THEN GOTO 266 IF ~PartyHasItem("clck17") PartyHasItem("clck01") PartyHasItem("scrl7u") PartyHasItem("scrl5k") ~ THEN GOTO 267 END IF ~~ THEN BEGIN 266 // from: 265.0 SAY #187704 /* ~Yes, I could make some improvements to a Robe of the Archmagi. With a Cloak of Protection +1 and scrolls of Spirit Armor and Contingency as reagents I could make a mantle worthy of Elminster. It would cost you 20,000 gold.~ */ IF ~~ THEN GOTO 268 END IF ~~ THEN BEGIN 267 // from: 265.1 SAY #187705 /* ~Yes, I could make some improvements to a Robe of the Archmagi. With a Cloak of Protection +1 and scrolls of Spirit Armor and Contingency as reagents I could make a mantle worthy of Elminster. It would cost you 20,000 gold. Interested?~ */ IF ~PartyGoldLT(20000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 268 IF ~PartyGoldGT(19999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",16) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(20000) DestroyGold(20000) TakePartyItemNum("clck17",1) DestroyItem("clck17") TakePartyItemNum("clck01",1) DestroyItem("clck01") TakePartyItemNum("scrl7u",1) DestroyItem("scrl7u") TakePartyItemNum("scrl5k",1) DestroyItem("scrl5k") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 268 END IF ~~ THEN BEGIN 268 // from: 267.2 267.0 266.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~PartyHasItem("helm04") ~ THEN GOTO 208 IF ~PartyHasItem("helm06") ~ THEN GOTO 212 IF ~PartyHasItem("leat20") ~ THEN GOTO 216 IF ~PartyHasItem("npplat") ~ THEN GOTO 220 IF ~PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~PartyHasItem("plat06") ~ THEN GOTO 236 IF ~PartyHasItem("ring06") ~ THEN GOTO 240 IF ~PartyHasItem("ring07") ~ THEN GOTO 244 IF ~OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~PartyHasItem("clck16") ~ THEN GOTO 261 END IF ~~ THEN BEGIN 269 // from: 475.51 471.51 467.51 463.51 459.51 445.50 441.50 437.50 433.50 428.50 424.50 420.50 416.50 400.50 389.50 378.50 373.50 329.49 318.49 314.49 310.49 306.49 300.49 296.49 292.49 288.49 284.49 280.49 276.49 13.51 SAY #187706 /* ~This be a mighty fine shield here...~ */ IF ~PartyHasItem("shld25") OR(3) !PartyHasItem("misc9x") !PartyHasItem("misc6z") NumItemsPartyLT("misc9y",2) ~ THEN GOTO 271 IF ~PartyHasItem("shld25") PartyHasItem("misc9x") PartyHasItem("misc6z") NumItemsPartyGT("misc9y",1) ~ THEN GOTO 270 END IF ~~ THEN BEGIN 270 // from: 269.1 SAY #187707 /* ~Ah, the Shield of Harmony. She's a beaute, I'll admit. If you had two flasks worth of Mind Flayer birthing brine, a Mind Flayer control circlet and a Beljuril I could forge up a storm with her. I'd charge you 10,000 gold as well, but she'd be stronger and more protective in the end.~ */ IF ~~ THEN GOTO 272 END IF ~~ THEN BEGIN 271 // from: 269.0 SAY #187708 /* ~Ah, the Shield of Harmony. She's a beaute, I'll admit. If you had two flasks worth of Mind Flayer birthing brine, a Mind Flayer control circlet and a Beljuril I could forge up a storm with her. That'll be for 10,000 gold though, take it or leave it..~ */ IF ~PartyGoldLT(10000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 272 IF ~PartyGoldGT(9999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",22) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(10000) DestroyGold(10000) TakePartyItemNum("shld25",1) DestroyItem("shld25") TakePartyItemNum("misc9x",1) DestroyItem("misc9x") TakePartyItemNum("misc6z",1) DestroyItem("misc6z") TakePartyItemNum("misc9y",1) DestroyItem("misc9y") TakePartyItemNum("misc9y",1) DestroyItem("misc9y") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 272 END IF ~~ THEN BEGIN 272 // from: 271.2 271.0 270.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~PartyHasItem("helm04") ~ THEN GOTO 208 IF ~PartyHasItem("helm06") ~ THEN GOTO 212 IF ~PartyHasItem("leat20") ~ THEN GOTO 216 IF ~PartyHasItem("npplat") ~ THEN GOTO 220 IF ~PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~PartyHasItem("plat06") ~ THEN GOTO 236 IF ~PartyHasItem("ring06") ~ THEN GOTO 240 IF ~PartyHasItem("ring07") ~ THEN GOTO 244 IF ~OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~PartyHasItem("clck16") ~ THEN GOTO 261 IF ~PartyHasItem("clck17") ~ THEN GOTO 265 END IF ~~ THEN BEGIN 273 // from: 475.52 471.52 467.52 463.52 459.52 445.51 441.51 437.51 433.51 428.51 424.51 420.51 416.51 400.51 389.51 378.51 373.51 329.50 318.50 314.50 310.50 306.50 300.50 296.50 292.50 288.50 284.50 280.50 13.52 SAY #187709 /* ~This buckler looks interesting...~ */ IF ~PartyHasItem("shld17") OR(2) !PartyHasItem("key23") NumItemsPartyLT("misc18",5) ~ THEN GOTO 274 IF ~PartyHasItem("shld17") PartyHasItem("key23") NumItemsPartyGT("misc18",4) ~ THEN GOTO 275 END IF ~~ THEN BEGIN 274 // from: 273.0 SAY #187710 /* ~Yes. I could forge the Holy Symbol of Amaunator into your buckler, granting it the protection of that long-forgotten deity. I'd also need 5 Sunstone gems and 10,000 gold for the job. I dunnae where you'll find one a those symbols though. I forge the items, you find the ingredients~ */ IF ~~ THEN GOTO 276 END IF ~~ THEN BEGIN 275 // from: 273.1 SAY #187711 /* ~Yes. I could forge your Holy Symbol of Amaunator into your buckler, granting it the protection of that long-forgotten deity. I'd also need 5 Sunstone gems and 10,000 gold for the job. Interested?~ */ IF ~PartyGoldLT(10000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 276 IF ~PartyGoldGT(9999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",33) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(10000) DestroyGold(10000) TakePartyItemNum("shld17",1) DestroyItem("shld17") TakePartyItemNum("key23",1) DestroyItem("key23") TakePartyItemNum("misc18",1) DestroyItem("misc18") TakePartyItemNum("misc18",1) DestroyItem("misc18") TakePartyItemNum("misc18",1) DestroyItem("misc18") TakePartyItemNum("misc18",1) DestroyItem("misc18") TakePartyItemNum("misc18",1) DestroyItem("misc18") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 276 END IF ~~ THEN BEGIN 276 // from: 275.2 275.0 274.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~PartyHasItem("helm04") ~ THEN GOTO 208 IF ~PartyHasItem("helm06") ~ THEN GOTO 212 IF ~PartyHasItem("leat20") ~ THEN GOTO 216 IF ~PartyHasItem("npplat") ~ THEN GOTO 220 IF ~PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~PartyHasItem("plat06") ~ THEN GOTO 236 IF ~PartyHasItem("ring06") ~ THEN GOTO 240 IF ~PartyHasItem("ring07") ~ THEN GOTO 244 IF ~OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~PartyHasItem("clck16") ~ THEN GOTO 261 IF ~PartyHasItem("clck17") ~ THEN GOTO 265 IF ~PartyHasItem("shld25") ~ THEN GOTO 269 END IF ~~ THEN BEGIN 277 // from: 475.53 471.53 467.53 463.53 459.53 445.52 441.52 437.52 433.52 428.52 424.52 420.52 416.52 400.52 389.52 378.52 373.52 329.51 318.51 314.51 310.51 306.51 300.51 296.51 292.51 288.51 284.51 13.53 SAY #187712 /* ~This spear been worked by a master craftsman. Let's see what another one can do then...~ */ IF ~PartyHasItem("sper06") !PartyHasItem("misc45") ~ THEN GOTO 278 IF ~PartyHasItem("sper06") PartyHasItem("misc45") ~ THEN GOTO 279 END IF ~~ THEN BEGIN 278 // from: 277.0 SAY #187713 /* ~Aye, with a Rogue Stone and 10,000 gold I could make a rapid throwing spear from your Spear +3.~ */ IF ~~ THEN GOTO 280 END IF ~~ THEN BEGIN 279 // from: 277.1 SAY #187714 /* ~Aye, with a Rogue Stone and 10,000 gold I could make a rapid throwing spear from your Spear +3. Ye interested?~ */ IF ~PartyGoldLT(10000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 280 IF ~PartyGoldGT(9999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",23) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(10000) DestroyGold(10000) TakePartyItemNum("sper06",1) DestroyItem("sper06") TakePartyItemNum("misc45",1) DestroyItem("misc45") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 280 END IF ~~ THEN BEGIN 280 // from: 279.2 279.0 278.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~PartyHasItem("helm04") ~ THEN GOTO 208 IF ~PartyHasItem("helm06") ~ THEN GOTO 212 IF ~PartyHasItem("leat20") ~ THEN GOTO 216 IF ~PartyHasItem("npplat") ~ THEN GOTO 220 IF ~PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~PartyHasItem("plat06") ~ THEN GOTO 236 IF ~PartyHasItem("ring06") ~ THEN GOTO 240 IF ~PartyHasItem("ring07") ~ THEN GOTO 244 IF ~OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~PartyHasItem("clck16") ~ THEN GOTO 261 IF ~PartyHasItem("clck17") ~ THEN GOTO 265 IF ~PartyHasItem("shld25") ~ THEN GOTO 269 IF ~PartyHasItem("shld17") ~ THEN GOTO 273 END IF ~~ THEN BEGIN 281 // from: 475.54 471.54 467.54 463.54 459.54 445.53 441.53 437.53 433.53 428.53 424.53 420.53 416.53 400.53 389.53 378.53 373.53 329.52 318.52 314.52 310.52 306.52 300.52 296.52 292.52 288.52 13.54 SAY #187715 /* ~If ye ask me, nancy things like unicorns dunna exist. But who's to stop ye from enchanting a fine weapon to begin with...~ */ IF ~PartyHasItem("sper07") !PartyHasItem("misc45") ~ THEN GOTO 282 IF ~PartyHasItem("sper07") PartyHasItem("misc45") ~ THEN GOTO 283 END IF ~~ THEN BEGIN 282 // from: 281.0 SAY #187716 /* ~Aye, with a Rogue Stone and 10,000 gold I could make a throwing spear from your Spear of the Unicorn.~ */ IF ~~ THEN GOTO 284 END IF ~~ THEN BEGIN 283 // from: 281.1 SAY #187717 /* ~Aye, with a Rogue Stone and 10,000 gold I could make a throwing spear from your Spear of the Unicorn. Should we get ta work then?~ */ IF ~PartyGoldLT(10000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 284 IF ~PartyGoldGT(9999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",24) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(10000) DestroyGold(10000) TakePartyItemNum("sper07",1) DestroyItem("sper07") TakePartyItemNum("misc45",1) DestroyItem("misc45") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 284 END IF ~~ THEN BEGIN 284 // from: 283.2 283.0 282.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~PartyHasItem("helm04") ~ THEN GOTO 208 IF ~PartyHasItem("helm06") ~ THEN GOTO 212 IF ~PartyHasItem("leat20") ~ THEN GOTO 216 IF ~PartyHasItem("npplat") ~ THEN GOTO 220 IF ~PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~PartyHasItem("plat06") ~ THEN GOTO 236 IF ~PartyHasItem("ring06") ~ THEN GOTO 240 IF ~PartyHasItem("ring07") ~ THEN GOTO 244 IF ~OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~PartyHasItem("clck16") ~ THEN GOTO 261 IF ~PartyHasItem("clck17") ~ THEN GOTO 265 IF ~PartyHasItem("shld25") ~ THEN GOTO 269 IF ~PartyHasItem("shld17") ~ THEN GOTO 273 IF ~PartyHasItem("sper06") ~ THEN GOTO 277 END IF ~~ THEN BEGIN 285 // from: 475.55 471.55 467.55 463.55 459.55 445.54 441.54 437.54 433.54 428.54 424.54 420.54 416.54 400.54 389.54 378.54 373.54 329.53 318.53 314.53 310.53 306.53 300.53 296.53 292.53 13.55 SAY #187718 /* ~I smell Sahuagin craftmanship on this spear. Lemme guess...~ */ IF ~PartyHasItem("sper08") !PartyHasItem("misc45") ~ THEN GOTO 286 IF ~PartyHasItem("sper08") PartyHasItem("misc45") ~ THEN GOTO 287 END IF ~~ THEN BEGIN 286 // from: 285.0 SAY #187719 /* ~Ah, the Impaler. If there's anything those Sahuagin can make, it's a harpoon. With a Rogue Stone and 15,000 gold I could make it into a rapid throwing spear for you.~ */ IF ~~ THEN GOTO 288 END IF ~~ THEN BEGIN 287 // from: 285.1 SAY #187720 /* ~Ah, the Impaler. If there's anything those Sahuagin can make, it's a harpoon. With a Rogue Stone and 15,000 gold I could make it into a rapid throwing spear for you. Ye won't be disappointed.~ */ IF ~PartyGoldLT(10000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 288 IF ~PartyGoldGT(9999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",25) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(10000) DestroyGold(10000) TakePartyItemNum("sper08",1) DestroyItem("sper08") TakePartyItemNum("misc45",1) DestroyItem("misc45") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 288 END IF ~~ THEN BEGIN 288 // from: 287.2 287.0 286.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~PartyHasItem("helm04") ~ THEN GOTO 208 IF ~PartyHasItem("helm06") ~ THEN GOTO 212 IF ~PartyHasItem("leat20") ~ THEN GOTO 216 IF ~PartyHasItem("npplat") ~ THEN GOTO 220 IF ~PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~PartyHasItem("plat06") ~ THEN GOTO 236 IF ~PartyHasItem("ring06") ~ THEN GOTO 240 IF ~PartyHasItem("ring07") ~ THEN GOTO 244 IF ~OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~PartyHasItem("clck16") ~ THEN GOTO 261 IF ~PartyHasItem("clck17") ~ THEN GOTO 265 IF ~PartyHasItem("shld25") ~ THEN GOTO 269 IF ~PartyHasItem("shld17") ~ THEN GOTO 273 IF ~PartyHasItem("sper06") ~ THEN GOTO 277 IF ~PartyHasItem("sper07") ~ THEN GOTO 281 END IF ~~ THEN BEGIN 289 // from: 475.56 471.56 467.56 463.56 459.56 445.55 441.55 437.55 433.55 428.55 424.55 420.55 416.55 400.55 389.55 378.55 373.55 329.54 318.54 314.54 310.54 306.54 300.54 296.54 13.56 SAY #187721 /* ~Aye, look at that Elemental Staff. I betcha I could make it even more impressive...~ */ IF ~OR(3) PartyHasItem("staf15") PartyHasItem("staf16") PartyHasItem("staf17") ~ THEN GOTO 290 IF ~PartyHasItem("staf15") PartyHasItem("staf16") PartyHasItem("staf17") ~ THEN GOTO 291 END IF ~~ THEN BEGIN 290 // from: 289.0 SAY #187722 /* ~I could combine the Staves of Air, Earth and Fire into a Staff of Elemental Mastery. It will also cost ya 20,000 gold, but I'm sure it'd be glorious.~ */ IF ~~ THEN GOTO 292 END IF ~~ THEN BEGIN 291 // from: 289.1 SAY #187723 /* ~I could combine the Staves of Air, Earth and Fire into a Staff of Elemental Mastery. It will also cost ya 20,000 gold, but I'm sure it'd be glorious. Ye interested?~ */ IF ~PartyGoldLT(20000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 292 IF ~PartyGoldGT(19999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",4) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(20000) DestroyGold(20000) TakePartyItemNum("staf15",1) DestroyItem("staf15") TakePartyItemNum("staf16",1) DestroyItem("staf16") TakePartyItemNum("staf17",1) DestroyItem("staf17") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 292 END IF ~~ THEN BEGIN 292 // from: 291.2 291.0 290.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~PartyHasItem("helm04") ~ THEN GOTO 208 IF ~PartyHasItem("helm06") ~ THEN GOTO 212 IF ~PartyHasItem("leat20") ~ THEN GOTO 216 IF ~PartyHasItem("npplat") ~ THEN GOTO 220 IF ~PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~PartyHasItem("plat06") ~ THEN GOTO 236 IF ~PartyHasItem("ring06") ~ THEN GOTO 240 IF ~PartyHasItem("ring07") ~ THEN GOTO 244 IF ~OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~PartyHasItem("clck16") ~ THEN GOTO 261 IF ~PartyHasItem("clck17") ~ THEN GOTO 265 IF ~PartyHasItem("shld25") ~ THEN GOTO 269 IF ~PartyHasItem("shld17") ~ THEN GOTO 273 IF ~PartyHasItem("sper06") ~ THEN GOTO 277 IF ~PartyHasItem("sper07") ~ THEN GOTO 281 IF ~PartyHasItem("sper08") ~ THEN GOTO 285 END IF ~~ THEN BEGIN 293 // from: 475.57 471.57 467.57 463.57 459.57 445.56 441.56 437.56 433.56 428.56 424.56 420.56 416.56 400.56 389.56 378.56 373.56 329.55 318.55 314.55 310.55 306.55 300.55 13.57 SAY #187724 /* ~What in the bloody hells are ye carrying a branch for? Oh, wait...~ */ IF ~PartyHasItem("staf14") OR(2) !PartyHasItem("ring03") !PartyHasItem("ring06") ~ THEN GOTO 294 IF ~PartyHasItem("staf14") PartyHasItem("ring03") PartyHasItem("ring06") ~ THEN GOTO 295 END IF ~~ THEN BEGIN 294 // from: 293.0 SAY #187725 /* ~Harumph. These foresty staves have never been me favorites, but with rings of Protection and Animal friendship I could improve the Staff of the Woodlands. I'd charge 20,000 gold for the job.~ */ IF ~~ THEN GOTO 296 END IF ~~ THEN BEGIN 295 // from: 293.1 SAY #187726 /* ~Harumph. These foresty staves have never been me favorites, but with rings of Protection and Animal friendship I could improve the Staff of the Woodlands. I'd charge 20,000 gold for the job. Interested?~ */ IF ~PartyGoldLT(20000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 296 IF ~PartyGoldGT(19999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",26) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(20000) DestroyGold(20000) TakePartyItemNum("staf14",1) DestroyItem("staf14") TakePartyItemNum("ring03",1) DestroyItem("ring03") TakePartyItemNum("ring06",1) DestroyItem("ring06") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 296 END IF ~~ THEN BEGIN 296 // from: 295.2 295.0 294.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~PartyHasItem("helm04") ~ THEN GOTO 208 IF ~PartyHasItem("helm06") ~ THEN GOTO 212 IF ~PartyHasItem("leat20") ~ THEN GOTO 216 IF ~PartyHasItem("npplat") ~ THEN GOTO 220 IF ~PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~PartyHasItem("plat06") ~ THEN GOTO 236 IF ~PartyHasItem("ring06") ~ THEN GOTO 240 IF ~PartyHasItem("ring07") ~ THEN GOTO 244 IF ~OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~PartyHasItem("clck16") ~ THEN GOTO 261 IF ~PartyHasItem("clck17") ~ THEN GOTO 265 IF ~PartyHasItem("shld25") ~ THEN GOTO 269 IF ~PartyHasItem("shld17") ~ THEN GOTO 273 IF ~PartyHasItem("sper06") ~ THEN GOTO 277 IF ~PartyHasItem("sper07") ~ THEN GOTO 281 IF ~PartyHasItem("sper08") ~ THEN GOTO 285 IF ~OR(3) PartyHasItem("staf15") PartyHasItem("staf16") PartyHasItem("staf17") ~ THEN GOTO 289 END IF ~~ THEN BEGIN 297 // from: 475.58 471.58 467.58 463.58 459.58 445.57 441.57 437.57 433.57 428.57 424.57 420.57 416.57 400.57 389.57 378.57 373.57 329.56 318.56 314.56 310.56 306.56 13.58 SAY #187727 /* ~The Daystar? Must've been adventuring a while if ye found this...~ */ IF ~PartyHasItem("sw1h31") OR(3) NumItemsPartyLT("scrl09",4) NumItemsPartyLT("miscau",2) NumItemsPartyLT("misc41",2) ~ THEN GOTO 298 IF ~PartyHasItem("sw1h31") NumItemsPartyGT("scrl09",3) NumItemsPartyGT("miscau",1) NumItemsPartyGT("misc41",1) ~ THEN GOTO 299 END IF ~~ THEN BEGIN 298 // from: 297.0 SAY #187728 /* ~With four scrolls of Protection from Undead, two vials of Holy Water and two star sapphires I could turn the Daystar into the underworld's worst nightmare. I'd charge 15,000 for the job.~ */ IF ~~ THEN GOTO 300 END IF ~~ THEN BEGIN 299 // from: 297.1 SAY #187728 /* ~With four scrolls of Protection from Undead, two vials of Holy Water and two star sapphires I could turn the Daystar into the underworld's worst nightmare. I'd charge 15,000 for the job.~ */ IF ~PartyGoldLT(15000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 300 IF ~PartyGoldGT(14999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",27) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(15000) DestroyGold(15000) TakePartyItemNum("sw1h31",1) DestroyItem("sw1h31") TakePartyItemNum("scrl09",1) DestroyItem("scrl09") TakePartyItemNum("scrl09",1) DestroyItem("scrl09") TakePartyItemNum("scrl09",1) DestroyItem("scrl09") TakePartyItemNum("scrl09",1) DestroyItem("scrl09") TakePartyItemNum("miscau",1) DestroyItem("miscau") TakePartyItemNum("miscau",1) DestroyItem("miscau") TakePartyItemNum("misc41",1) DestroyItem("misc41") TakePartyItemNum("misc41",1) DestroyItem("misc41") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 300 END IF ~~ THEN BEGIN 300 // from: 299.2 299.0 298.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~PartyHasItem("helm04") ~ THEN GOTO 208 IF ~PartyHasItem("helm06") ~ THEN GOTO 212 IF ~PartyHasItem("leat20") ~ THEN GOTO 216 IF ~PartyHasItem("npplat") ~ THEN GOTO 220 IF ~PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~PartyHasItem("plat06") ~ THEN GOTO 236 IF ~PartyHasItem("ring06") ~ THEN GOTO 240 IF ~PartyHasItem("ring07") ~ THEN GOTO 244 IF ~OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~PartyHasItem("clck16") ~ THEN GOTO 261 IF ~PartyHasItem("clck17") ~ THEN GOTO 265 IF ~PartyHasItem("shld25") ~ THEN GOTO 269 IF ~PartyHasItem("shld17") ~ THEN GOTO 273 IF ~PartyHasItem("sper06") ~ THEN GOTO 277 IF ~PartyHasItem("sper07") ~ THEN GOTO 281 IF ~PartyHasItem("sper08") ~ THEN GOTO 285 IF ~OR(3) PartyHasItem("staf15") PartyHasItem("staf16") PartyHasItem("staf17") ~ THEN GOTO 289 IF ~PartyHasItem("staf14") ~ THEN GOTO 293 END IF ~~ THEN BEGIN 301 // from: 475.59 471.59 467.59 463.59 459.59 445.58 441.58 437.58 433.58 428.58 424.58 420.58 416.58 400.58 389.58 378.58 373.58 329.57 318.57 314.57 310.57 13.59 SAY #187729 /* ~A katana? Looks like original Kara-Turan craftmanship too...~ */ IF ~PartyHasItem("sw1h51") PartyHasItem("misc6m") PartyHasItem("wand07") ~ THEN GOTO 303 IF ~PartyHasItem("sw1h51") !PartyHasItem("misc6m") PartyHasItem("wand07") PartyHasItem("plot02i") ~ THEN GOTO 304 IF ~PartyHasItem("sw1h51") !PartyHasItem("misc6m") PartyHasItem("wand07") PartyHasItem("plot02j") ~ THEN GOTO 305 IF ~PartyHasItem("sw1h51") OR(4) !PartyHasItem("misc6m") !PartyHasItem("wand07") !PartyHasItem("plot02i") !PartyHasItem("plot02j") ~ THEN GOTO 302 END IF ~~ THEN BEGIN 302 // from: 301.3 SAY #187730 /* ~Celestial Fury? I'm nay from Kara-Tur, and enchanting a Katana is no easy task, but with a Demon Heart and a Wand of Lightning I could just about do it. I'd charge you 20,000 for me sweat.~ */ IF ~~ THEN GOTO 306 END IF ~~ THEN BEGIN 303 // from: 301.0 SAY #187731 /* ~Celestial Fury? I'm nay from Kara-Tur, and enchanting a Katana is no easy task, but with a Demon Heart and a Wand of Lightning I could just about do it. I'd charge you 20,000 for me sweat. Interested?~ */ IF ~PartyGoldLT(20000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 306 IF ~PartyGoldGT(19999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",41) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(20000) DestroyGold(20000) TakePartyItemNum("sw1h51",1) DestroyItem("sw1h51") TakePartyItemNum("misc6m",1) DestroyItem("misc6m") TakePartyItemNum("wand07",1) DestroyItem("wand07") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 306 END IF ~~ THEN BEGIN 304 // from: 301.1 SAY #187731 /* ~Celestial Fury? I'm nay from Kara-Tur, and enchanting a Katana is no easy task, but with a Demon Heart and a Wand of Lightning I could just about do it. I'd charge you 20,000 for me sweat. Interested?~ */ IF ~PartyGoldLT(20000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 306 IF ~PartyGoldGT(19999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",41) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(20000) DestroyGold(20000) TakePartyItemNum("sw1h51",1) DestroyItem("sw1h51") TakePartyItemNum("plot02i",1) DestroyItem("plot02i") TakePartyItemNum("wand07",1) DestroyItem("wand07") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 306 END IF ~~ THEN BEGIN 305 // from: 301.2 SAY #187731 /* ~Celestial Fury? I'm nay from Kara-Tur, and enchanting a Katana is no easy task, but with a Demon Heart and a Wand of Lightning I could just about do it. I'd charge you 20,000 for me sweat. Interested?~ */ IF ~PartyGoldLT(20000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 306 IF ~PartyGoldGT(19999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",41) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(20000) DestroyGold(20000) TakePartyItemNum("sw1h51",1) DestroyItem("sw1h51") TakePartyItemNum("plot02j",1) DestroyItem("plot02j") TakePartyItemNum("wand07",1) DestroyItem("wand07") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 306 END IF ~~ THEN BEGIN 306 // from: 305.2 305.0 304.2 304.0 303.2 303.0 302.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~PartyHasItem("helm04") ~ THEN GOTO 208 IF ~PartyHasItem("helm06") ~ THEN GOTO 212 IF ~PartyHasItem("leat20") ~ THEN GOTO 216 IF ~PartyHasItem("npplat") ~ THEN GOTO 220 IF ~PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~PartyHasItem("plat06") ~ THEN GOTO 236 IF ~PartyHasItem("ring06") ~ THEN GOTO 240 IF ~PartyHasItem("ring07") ~ THEN GOTO 244 IF ~OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~PartyHasItem("clck16") ~ THEN GOTO 261 IF ~PartyHasItem("clck17") ~ THEN GOTO 265 IF ~PartyHasItem("shld25") ~ THEN GOTO 269 IF ~PartyHasItem("shld17") ~ THEN GOTO 273 IF ~PartyHasItem("sper06") ~ THEN GOTO 277 IF ~PartyHasItem("sper07") ~ THEN GOTO 281 IF ~PartyHasItem("sper08") ~ THEN GOTO 285 IF ~OR(3) PartyHasItem("staf15") PartyHasItem("staf16") PartyHasItem("staf17") ~ THEN GOTO 289 IF ~PartyHasItem("staf14") ~ THEN GOTO 293 IF ~PartyHasItem("sw1h31") ~ THEN GOTO 297 END IF ~~ THEN BEGIN 307 // from: 475.60 471.60 467.60 463.60 459.60 445.59 441.59 437.59 433.59 428.59 424.59 420.59 416.59 400.59 389.59 378.59 373.59 329.58 318.58 314.58 13.60 SAY #187732 /* ~A fine sword ye got over here, me friend. I think I know something that can make it better...~ */ IF ~PartyHasItem("sw1h52") OR(2) !PartyHasItem("sw1h23") !PartyHasItem("sw1h35") ~ THEN GOTO 308 IF ~PartyHasItem("sw1h52") PartyHasItem("sw1h23") PartyHasItem("sw1h35") ~ THEN GOTO 309 END IF ~~ THEN BEGIN 308 // from: 307.0 SAY #187733 /* ~Aye, with Water's Edge, Adjatha the Drinker and Rashad's Talon we could forge a curved blade that would make the Stormlord himself green with envy. Such a water-based blade would cost ye 15,000 gold.~ */ IF ~~ THEN GOTO 310 END IF ~~ THEN BEGIN 309 // from: 307.1 SAY #187734 /* ~Aye, with Water's Edge, Adjatha the Drinker and Rashad's Talon we could forge a curved blade that would make the Stormlord himself green with envy. Such a water-based blade would cost ye 15,000 gold. Interested?~ */ IF ~PartyGoldLT(15000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 310 IF ~PartyGoldGT(14999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",36) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(15000) DestroyGold(15000) TakePartyItemNum("sw1h52",1) DestroyItem("sw1h52") TakePartyItemNum("sw1h23",1) DestroyItem("sw1h23") TakePartyItemNum("sw1h35",1) DestroyItem("sw1h35") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 310 END IF ~~ THEN BEGIN 310 // from: 309.2 309.0 308.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~PartyHasItem("helm04") ~ THEN GOTO 208 IF ~PartyHasItem("helm06") ~ THEN GOTO 212 IF ~PartyHasItem("leat20") ~ THEN GOTO 216 IF ~PartyHasItem("npplat") ~ THEN GOTO 220 IF ~PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~PartyHasItem("plat06") ~ THEN GOTO 236 IF ~PartyHasItem("ring06") ~ THEN GOTO 240 IF ~PartyHasItem("ring07") ~ THEN GOTO 244 IF ~OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~PartyHasItem("clck16") ~ THEN GOTO 261 IF ~PartyHasItem("clck17") ~ THEN GOTO 265 IF ~PartyHasItem("shld25") ~ THEN GOTO 269 IF ~PartyHasItem("shld17") ~ THEN GOTO 273 IF ~PartyHasItem("sper06") ~ THEN GOTO 277 IF ~PartyHasItem("sper07") ~ THEN GOTO 281 IF ~PartyHasItem("sper08") ~ THEN GOTO 285 IF ~OR(3) PartyHasItem("staf15") PartyHasItem("staf16") PartyHasItem("staf17") ~ THEN GOTO 289 IF ~PartyHasItem("staf14") ~ THEN GOTO 293 IF ~PartyHasItem("sw1h31") ~ THEN GOTO 297 IF ~PartyHasItem("sw1h51") ~ THEN GOTO 301 END IF ~~ THEN BEGIN 311 // from: 475.61 471.61 467.61 463.61 459.61 445.60 441.60 437.60 433.60 428.60 424.60 420.60 416.60 400.60 389.60 378.60 373.60 329.59 318.59 13.61 SAY #187735 /* ~Ah, the blighted so-called 'Sentient Sword'. I cannae tell you how many times I've had adventurers come in here and ask me to dull it for good...~ */ IF ~PartyHasItem("sw2h14") !PartyHasItem("misc9x") ~ THEN GOTO 312 IF ~PartyHasItem("sw2h14") PartyHasItem("misc9x") ~ THEN GOTO 313 END IF ~~ THEN BEGIN 312 // from: 311.0 SAY #187736 /* ~If you had a Mind Flayer Control Circlet I could put a damper on its chatter and make it more useful all the same. I'd charge 20,000 gold for the task.~ */ IF ~~ THEN GOTO 314 END IF ~~ THEN BEGIN 313 // from: 311.1 SAY #187737 /* ~If you had a Mind Flayer Control Circlet I could put a damper on its chatter and make it more useful all the same. I'd charge 20,000 gold for the task. Tell me when yer ready.~ */ IF ~PartyGoldLT(20000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 314 IF ~PartyGoldGT(19999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",31) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(20000) DestroyGold(20000) TakePartyItemNum("sw2h14",1) DestroyItem("sw2h14") TakePartyItemNum("misc9x",1) DestroyItem("misc9x") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 314 END IF ~~ THEN BEGIN 314 // from: 313.2 313.0 312.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~PartyHasItem("helm04") ~ THEN GOTO 208 IF ~PartyHasItem("helm06") ~ THEN GOTO 212 IF ~PartyHasItem("leat20") ~ THEN GOTO 216 IF ~PartyHasItem("npplat") ~ THEN GOTO 220 IF ~PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~PartyHasItem("plat06") ~ THEN GOTO 236 IF ~PartyHasItem("ring06") ~ THEN GOTO 240 IF ~PartyHasItem("ring07") ~ THEN GOTO 244 IF ~OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~PartyHasItem("clck16") ~ THEN GOTO 261 IF ~PartyHasItem("clck17") ~ THEN GOTO 265 IF ~PartyHasItem("shld25") ~ THEN GOTO 269 IF ~PartyHasItem("shld17") ~ THEN GOTO 273 IF ~PartyHasItem("sper06") ~ THEN GOTO 277 IF ~PartyHasItem("sper07") ~ THEN GOTO 281 IF ~PartyHasItem("sper08") ~ THEN GOTO 285 IF ~OR(3) PartyHasItem("staf15") PartyHasItem("staf16") PartyHasItem("staf17") ~ THEN GOTO 289 IF ~PartyHasItem("staf14") ~ THEN GOTO 293 IF ~PartyHasItem("sw1h31") ~ THEN GOTO 297 IF ~PartyHasItem("sw1h51") ~ THEN GOTO 301 IF ~PartyHasItem("sw1h52") ~ THEN GOTO 307 END IF ~~ THEN BEGIN 315 // from: 475.62 471.62 467.62 463.62 459.62 445.61 441.61 437.61 433.61 428.61 424.61 420.61 416.61 400.61 389.61 378.61 373.61 329.60 13.62 SAY #187738 /* ~Some fine leather ye got there. Look's like it could be enchanted further...~ */ IF ~PartyHasItem("npchan") OR(2) !PartyHasItem("leat19") !PartyHasItem("scrl07") ~ THEN GOTO 316 IF ~PartyHasItem("npchan") PartyHasItem("leat19") PartyHasItem("scrl07") ~ THEN GOTO 317 END IF ~~ THEN BEGIN 316 // from: 315.0 SAY #187739 /* ~Ah, there's a mageborn family. Using a Protection From Magic Scroll as a catalyst I could forge together the Corthala Family Armor and armor from a Shadow Dragon. It would cost you 10,000 gold.~ */ IF ~~ THEN GOTO 318 END IF ~~ THEN BEGIN 317 // from: 315.1 SAY #187740 /* ~Ah, there's a mageborn family. Using a Protection From Magic Scroll as a catalyst I could forge together the Corthala Family Armor and armor from a Shadow Dragon. It would cost you 10,000 gold. Whaddye think?~ */ IF ~PartyGoldLT(10000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 318 IF ~PartyGoldGT(9999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("XO#ItemUp","ar0334",13) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(10000) DestroyGold(10000) TakePartyItemNum("npchan",1) DestroyItem("npchan") TakePartyItemNum("leat19",1) DestroyItem("leat19") TakePartyItemNum("scrl07",1) DestroyItem("scrl07") ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 318 END IF ~~ THEN BEGIN 318 // from: 317.2 317.0 316.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~PartyHasItem("helm04") ~ THEN GOTO 208 IF ~PartyHasItem("helm06") ~ THEN GOTO 212 IF ~PartyHasItem("leat20") ~ THEN GOTO 216 IF ~PartyHasItem("npplat") ~ THEN GOTO 220 IF ~PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~PartyHasItem("plat06") ~ THEN GOTO 236 IF ~PartyHasItem("ring06") ~ THEN GOTO 240 IF ~PartyHasItem("ring07") ~ THEN GOTO 244 IF ~OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~PartyHasItem("clck16") ~ THEN GOTO 261 IF ~PartyHasItem("clck17") ~ THEN GOTO 265 IF ~PartyHasItem("shld25") ~ THEN GOTO 269 IF ~PartyHasItem("shld17") ~ THEN GOTO 273 IF ~PartyHasItem("sper06") ~ THEN GOTO 277 IF ~PartyHasItem("sper07") ~ THEN GOTO 281 IF ~PartyHasItem("sper08") ~ THEN GOTO 285 IF ~OR(3) PartyHasItem("staf15") PartyHasItem("staf16") PartyHasItem("staf17") ~ THEN GOTO 289 IF ~PartyHasItem("staf14") ~ THEN GOTO 293 IF ~PartyHasItem("sw1h31") ~ THEN GOTO 297 IF ~PartyHasItem("sw1h51") ~ THEN GOTO 301 IF ~PartyHasItem("sw1h52") ~ THEN GOTO 307 IF ~PartyHasItem("sw2h14") ~ THEN GOTO 311 END IF ~~ THEN BEGIN 319 // from: SAY #188382 /* ~You have failed to add anything extraordinary, gnome.~ */ IF ~~ THEN REPLY #188350 /* ~Chief Engineer Mage? It seems like a very important position.~ */ EXTERN ~NANSTEIN~ 1 IF ~~ THEN REPLY #188351 /* ~Yes, yes, I already knew that. How can you help me?~ */ EXTERN ~NANSTEIN~ 2 IF ~~ THEN REPLY #188352 /* ~If you think I'm going to indulge in something so stupid, you're wrong. Stay away from me, pathetic thief.~ */ EXTERN ~NANSTEIN~ 3 IF ~IfValidForPartyDialogue("Aerie") ~ THEN EXTERN ~NANSTEIN~ 21 IF ~IfValidForPartyDialogue("Aerie") ~ THEN EXTERN ~AERIEJ~ 286 IF ~IfValidForPartyDialogue("Minsc") ~ THEN EXTERN ~NANSTEIN~ 20 IF ~IfValidForPartyDialogue("Minsc") ~ THEN EXTERN ~MINSCJ~ 717 IF ~IfValidForPartyDialogue("Minsc") ~ THEN EXTERN ~NANSTEIN~ 19 IF ~IfValidForPartyDialogue("Minsc") ~ THEN EXTERN ~MINSCJ~ 716 IF ~IfValidForPartyDialogue("Minsc") ~ THEN EXTERN ~NANSTEIN~ 18 IF ~IfValidForPartyDialogue("Minsc") ~ THEN EXTERN ~MINSCJ~ 715 IF ~True() ~ THEN GOTO 320 IF ~True() ~ THEN EXTERN ~NANSTEIN~ 17 END IF ~~ THEN BEGIN 320 // from: 319.11 SAY #188384 /* ~... should be more than all the treasure of a red dragon to quench your insatiable appetite for turnips.~ */ IF ~~ THEN REPLY #188350 /* ~Chief Engineer Mage? It seems like a very important position.~ */ EXTERN ~NANSTEIN~ 1 IF ~~ THEN REPLY #188351 /* ~Yes, yes, I already knew that. How can you help me?~ */ EXTERN ~NANSTEIN~ 2 IF ~~ THEN REPLY #188352 /* ~If you think I'm going to indulge in something so stupid, you're wrong. Stay away from me, pathetic thief.~ */ EXTERN ~NANSTEIN~ 3 IF ~IfValidForPartyDialogue("Aerie") ~ THEN EXTERN ~NANSTEIN~ 21 IF ~IfValidForPartyDialogue("Aerie") ~ THEN EXTERN ~AERIEJ~ 286 IF ~IfValidForPartyDialogue("Minsc") ~ THEN EXTERN ~NANSTEIN~ 20 IF ~IfValidForPartyDialogue("Minsc") ~ THEN EXTERN ~MINSCJ~ 717 IF ~IfValidForPartyDialogue("Minsc") ~ THEN EXTERN ~NANSTEIN~ 19 IF ~IfValidForPartyDialogue("Minsc") ~ THEN EXTERN ~MINSCJ~ 716 IF ~IfValidForPartyDialogue("Minsc") ~ THEN EXTERN ~NANSTEIN~ 18 IF ~IfValidForPartyDialogue("Minsc") ~ THEN EXTERN ~MINSCJ~ 715 END IF ~~ THEN BEGIN 321 // from: 475.1 471.1 467.1 463.1 459.1 445.1 441.1 437.1 433.1 428.1 424.1 420.1 416.1 400.1 389.1 378.1 373.1 13.1 SAY #193394 /* ~Now this looks interesting - let me take a closer look at that...~ */ IF ~PartyHasItem("sw1h40") !PartyHasItem("m#jbrace") ~ THEN GOTO 322 IF ~!PartyHasItem("sw1h40") PartyHasItem("m#jbrace") ~ THEN EXTERN ~M#AMBERN~ 75 IF ~PartyHasItem("sw1h40") PartyHasItem("m#jbrace") ~ THEN EXTERN ~M#AMBERN~ 75 END IF ~~ THEN BEGIN 322 // from: 321.0 SAY #193395 /* ~Hmmm... Seems that the Blade of Roses here has something missing. Se this cavity at the end of the pommel here? If I recalls me lore correctly, it ought to have a large cabochon ruby in it. Too bad that it's fallen off somewhere; seems that the weight's a bit off because of it. So if I were you, I'd be on the lookout for any largish rounded rubies that might fit here. It'd make one fine sword even finer.~ */ IF ~~ THEN REPLY #193396 /* ~I'll keep that in mind. Do I have anything else you could use?~ */ DO ~ActionOverride("M#Amber",SetDialogue("m#amberj")) ~ GOTO 329 END IF ~~ THEN BEGIN 323 // from: SAY #193397 /* ~Easy there now - I recognise that gem set on that bracelet... what an odd place for it. This bracelet itself is worth next to nothing - it's not even real silver. What's interesting is why this gem was ever put on it... I cannot fathom, but... ~ */ IF ~!PartyHasItem("sw1h40") ~ THEN EXTERN ~M#AMBERN~ 76 IF ~PartyHasItem("sw1h40") ~ THEN GOTO 326 END IF ~~ THEN BEGIN 324 // from: SAY #193398 /* ~Easy there lass, I meant no offense. But what I was about to say was that this ruby originally comes from a sword known as the Blade of Roses. It must have fallen off at some point in the sword's history. So, you might want to be on the lookout for a beautiful sword, about this long, that's decorated with rose-motif engravings. If you's happen to come across it, I would be more than glad to reunite it with this gem.~ */ IF ~~ THEN EXTERN ~M#AMBERN~ 77 END IF ~~ THEN BEGIN 325 // from: SAY #193399 /* ~Well, I can't force it off you, but it'd be a right shame to keep those two pieces apart.~ */ IF ~~ THEN REPLY #193400 /* ~I'll be sure to come and see you, Cromwell, if I happen to come across that blade. Do I have anything else that you could use?~ */ DO ~ActionOverride("M#Amber",SetDialogue("m#amberj")) ~ GOTO 329 IF ~~ THEN REPLY #193401 /* ~Well, you heard Amber here. I'm sure that sword would be useful, but if she does not want to give up her bracelet, there is nothing I can do. Do I have anything else that you could use?~ */ DO ~ActionOverride("M#Amber",SetDialogue("m#amberj")) ~ GOTO 329 END IF ~~ THEN BEGIN 326 // from: 323.1 SAY #193402 /* ~By the Soul Forger! If this isn't the Blade of Roses itself, I shan't be called a smith no longer. Before I met you, I never even knew this sword was missing a piece and here they both are. So, shall we put it together for you already?~ */ IF ~~ THEN EXTERN ~M#AMBERN~ 78 END IF ~~ THEN BEGIN 327 // from: SAY #193403 /* ~Hrm. Right. I'll just see if you have something else then.~ */ IF ~~ THEN DO ~ActionOverride("M#Amber",SetDialogue("m#amberj")) ~ GOTO 329 END IF ~~ THEN BEGIN 328 // from: SAY #193404 /* ~Good, good, I'm glad you made that decision.~ */ IF ~~ THEN REPLY #193405 /* ~What would you need to combine the gem with the sword?~ */ DO ~SetGlobal("M#ForgeItem","GLOBAL",1) ActionOverride("M#Amber",SetDialogue("m#amberj")) ~ GOTO 54 IF ~~ THEN REPLY #193406 /* ~I don't think I want to combine them after all. Do I have anything else you could work with?~ */ DO ~ActionOverride("M#Amber",SetDialogue("m#amberj")) ~ GOTO 329 END IF ~~ THEN BEGIN 329 // from: 328.1 327.0 325.1 325.0 322.0 54.8 SAY #193407 /* ~Let's see then...~ */ IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~PartyHasItem("npshld") ~ THEN GOTO 144 IF ~PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~PartyHasItem("blun22") ~ THEN GOTO 158 IF ~PartyHasItem("blun18") ~ THEN GOTO 162 IF ~PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("boot02") ~ THEN GOTO 170 IF ~PartyHasItem("boot03") ~ THEN GOTO 174 IF ~PartyHasItem("boot04") ~ THEN GOTO 178 IF ~PartyHasItem("boot05") ~ THEN GOTO 182 IF ~PartyHasItem("bow10") ~ THEN GOTO 186 IF ~OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~PartyHasItem("chan14") ~ THEN GOTO 195 IF ~OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~PartyHasItem("helm04") ~ THEN GOTO 208 IF ~PartyHasItem("helm06") ~ THEN GOTO 212 IF ~PartyHasItem("leat20") ~ THEN GOTO 216 IF ~PartyHasItem("npplat") ~ THEN GOTO 220 IF ~PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~PartyHasItem("plat06") ~ THEN GOTO 236 IF ~PartyHasItem("ring06") ~ THEN GOTO 240 IF ~PartyHasItem("ring07") ~ THEN GOTO 244 IF ~OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~PartyHasItem("clck16") ~ THEN GOTO 261 IF ~PartyHasItem("clck17") ~ THEN GOTO 265 IF ~PartyHasItem("shld25") ~ THEN GOTO 269 IF ~PartyHasItem("shld17") ~ THEN GOTO 273 IF ~PartyHasItem("sper06") ~ THEN GOTO 277 IF ~PartyHasItem("sper07") ~ THEN GOTO 281 IF ~PartyHasItem("sper08") ~ THEN GOTO 285 IF ~OR(3) PartyHasItem("staf15") PartyHasItem("staf16") PartyHasItem("staf17") ~ THEN GOTO 289 IF ~PartyHasItem("staf14") ~ THEN GOTO 293 IF ~PartyHasItem("sw1h31") ~ THEN GOTO 297 IF ~PartyHasItem("sw1h51") ~ THEN GOTO 301 IF ~PartyHasItem("sw1h52") ~ THEN GOTO 307 IF ~PartyHasItem("sw2h14") ~ THEN GOTO 311 IF ~PartyHasItem("npchan") ~ THEN GOTO 315 END IF WEIGHT #15 /* Triggers after states #: 349 458 even though they appear after this state */ ~GlobalGT("M#ForgeItem","GLOBAL",0) ~ THEN BEGIN 330 // from: SAY #59797 /* ~Well, there ye go, me friend. Use it well. And if ye comes across anything else of interest, ye knows where to bring it, aye?~ */ IF ~~ THEN DO ~SetGlobal("M#ForgeItem","GLOBAL",0) ActionOverride("M#Amber",SetDialogue("m#amberj")) ~ EXIT END IF ~~ THEN BEGIN 331 // from: 475.63 471.63 467.63 463.63 459.63 445.62 441.62 437.62 433.62 428.62 424.62 420.62 416.62 400.62 389.62 378.62 373.62 341.0 50.1 48.1 43.2 38.3 33.4 23.5 19.6 13.63 SAY #193408 /* ~Now this here be interesting...~ */ IF ~PartyHasItem("m#bchide") ~ THEN GOTO 332 IF ~PartyHasItem("m#wskin") ~ THEN GOTO 335 IF ~PartyHasItem("m#wskin") PartyHasItem("m#bchide") ~ THEN GOTO 338 END IF ~~ THEN BEGIN 332 // from: 331.0 SAY #193409 /* ~Ain't really my speciality, but I know that ol' Rashryn would love ta set his eyes on this cat hide ya got 'ere.~ */ IF ~~ THEN GOTO 333 END IF ~~ THEN BEGIN 333 // from: 332.0 SAY #193410 /* ~Ya should drop by 'im at the Promenade - I reckon he could make sumthin' outta it for ya.~ */ IF ~~ THEN GOTO 334 END IF ~~ THEN BEGIN 334 // from: 333.0 SAY #193411 /* ~Hmm. Looks like ye've nothing amongst yer goods that I could work with. If ye come across anything interesting later, friend, ye knows where to come, aye? An' in the meantime, just go see ol' Rashryn, will ya.~ */ IF ~~ THEN EXIT END IF ~~ THEN BEGIN 335 // from: 331.1 SAY #193412 /* ~Ain't quite what I like ta work with, but I know that ol' Rashryn could have sum ideas about this 'ere reptile skin.~ */ IF ~~ THEN GOTO 336 END IF ~~ THEN BEGIN 336 // from: 335.0 SAY #193413 /* ~Wyvern, is it? I reckon you could give 'im a call over at Waukeen's - I could bet ya me left hand that he could make sumthin' outta it for ya.~ */ IF ~~ THEN GOTO 337 END IF ~~ THEN BEGIN 337 // from: 336.0 SAY #193411 /* ~Hmm. Looks like ye've nothing amongst yer goods that I could work with. If ye come across anything interesting later, friend, ye knows where to come, aye? An' in the meantime, just go see ol' Rashryn, will ya.~ */ IF ~~ THEN EXIT END IF ~~ THEN BEGIN 338 // from: 331.2 SAY #193414 /* ~Ain't quite what I like ta work with, but I know that ol' Rashryn could have sum ideas about these 'ere skins ya got.~ */ IF ~~ THEN GOTO 339 END IF ~~ THEN BEGIN 339 // from: 338.0 SAY #193415 /* ~Wyvern, is it? And some sorta big cat, by the looks o' this other one. I reckon you should give Rashryn a call over at Waukeen's - I could bet ya me left hand that he could make sumthin' outta 'em for ya.~ */ IF ~~ THEN GOTO 340 END IF ~~ THEN BEGIN 340 // from: 339.0 SAY #193411 /* ~Hmm. Looks like ye've nothing amongst yer goods that I could work with. If ye come across anything interesting later, friend, ye knows where to come, aye? An' in the meantime, just go see ol' Rashryn, will ya.~ */ IF ~~ THEN EXIT END IF ~~ THEN BEGIN 341 // from: 54.5 51.1 SAY #193416 /* ~Hmmm... Lessee... ~ */ IF ~~ THEN GOTO 331 END IF ~~ THEN BEGIN 342 // from: 364.12 58.12 SAY #202693 /* ~Heh, that lad be bringing me good business, it seems. Let me see if ye be having the materials I need for it.~ */ IF ~PartyHasItem("Dagg15") ~ THEN GOTO 344 IF ~!PartyHasItem("Dagg15") ~ THEN GOTO 343 END IF ~~ THEN BEGIN 343 // from: 342.1 SAY #202694 /* ~Looks like ye haven't got the dagger I have to be needing for improving this katana of your friend's. Perhaps when you have found one you can ask me about it again.~ */ IF ~~ THEN GOTO 13 END IF ~~ THEN BEGIN 344 // from: 342.0 SAY #202695 /* ~Well it be seeming ye do have a dagger that's suitable after all. Now just the matter of the gold, it will cost ye 7,500 for such work with the forge.~ */ IF ~PartyGoldGT(7499) ~ THEN REPLY #202696 /* ~That sounds fine. Let's do it.~ */ DO ~TakePartyGold(7500) DestroyGold(7500) TakePartyItemNum("Dagg15",1) DestroyItem("Dagg15") TakePartyItemNum("NPSW02",1) DestroyItem("NPSW02") CreateVisualEffectObject("SPCRTWPN",Myself) GiveItemCreate("YoshKata","Yoshimo",0,0,0) ~ EXIT IF ~~ THEN REPLY #14641 /* ~Maybe another time.~ */ GOTO 13 END IF ~~ THEN BEGIN 345 // from: 364.8 58.8 SAY #202697 /* ~Well ye be needing some scrolls, one with a Word to keep them foes still, another simply to snuff out a target's lifeforce. And a good amount of coin, 10,000 gold, no less, for the work.~ */ IF ~PartyHasItem("SCRL8Q") PartyHasItem("SCRL8O") PartyGoldGT(9999) ~ THEN REPLY #202684 /* ~I've all the materials necessary and am willing to pay.~ */ DO ~TakePartyGold(10000) DestroyGold(10000) TakePartyItemNum("SCRL8Q",1) DestroyItem("SCRL8Q") TakePartyItemNum("SCRL8O",1) DestroyItem("SCRL8O") CreateVisualEffectObject("SPCRTWPN",Myself) SetGlobal("KvDagUpg","GLOBAL",1) TakeItemReplace("KovaDag3","KovaDag2","Kova") ~ EXIT IF ~~ THEN REPLY #52587 /* ~Maybe some other time.~ */ GOTO 13 END IF ~~ THEN BEGIN 346 // from: 364.9 58.9 SAY #202698 /* ~Well ye be needing a scroll to quicken actions without tiring, and an ordinary Ring of Protection. And not be forgetting the coin, 10,000 gold, no less, for the work.~ */ IF ~PartyHasItem("SCRL7Q") PartyHasItem("RING06") PartyGoldGT(9999) ~ THEN REPLY #202684 /* ~I've all the materials necessary and am willing to pay.~ */ DO ~TakePartyGold(10000) DestroyGold(10000) TakePartyItemNum("SCRL7Q",1) DestroyItem("SCRL7Q") TakePartyItemNum("RING06",1) DestroyItem("RING06") CreateVisualEffectObject("SPCRTWPN",Myself) SetGlobal("KvArmUpg","GLOBAL",1) TakeItemReplace("KovaArm2","KovaArm1","Kova") ~ EXIT IF ~~ THEN REPLY #52587 /* ~Maybe some other time.~ */ GOTO 13 END IF ~~ THEN BEGIN 347 // from: 364.10 58.10 SAY #202699 /* ~Well ye be needing to add twenty +2 arrows to some scrolls, three to dispel magic, and two to see things as they really are. And a good amount of coin, 10,000 gold, no less, for the work.~ */ IF ~NumItemsPartyGT("SCRL1E",2) NumItemsPartyGT("SCRL7M",1) NumItemsPartyGT("AROW11",19) PartyGoldGT(9999) ~ THEN REPLY #202684 /* ~I've all the materials necessary and am willing to pay.~ */ DO ~TakePartyGold(10000) DestroyGold(10000) TakePartyItemNum("SCRL7M",2) DestroyItem("SCRL7M") TakePartyItemNum("SCRL1E",3) DestroyItem("SCRL1E") TakePartyItemNum("AROW11",20) DestroyItem("ARROW11") CreateVisualEffectObject("SPCRTWPN",Myself) SetGlobal("KyBowUpg","GLOBAL",1) TakeItemReplace("KiyoBow2","KiyoBow1","Kiyone") ~ EXIT IF ~~ THEN REPLY #52587 /* ~Maybe some other time.~ */ GOTO 13 END IF ~~ THEN BEGIN 348 // from: 364.11 58.11 SAY #202700 /* ~I be needing to get a magical large shield effective at stopping arrows, called something about stars, a plain amulet of magic resistance, and some 10,000 gold for the work of putting it all together.~ */ IF ~PartyHasItem("SHLD07") PartyHasItem("AMUL19") PartyGoldGT(9999) ~ THEN REPLY #202684 /* ~I've all the materials necessary and am willing to pay.~ */ DO ~TakePartyGold(10000) DestroyGold(10000) TakePartyItemNum("SHLD07",1) DestroyItem("SHLD07") TakePartyItemNum("AMUL19",1) DestroyItem("AMUL19") CreateVisualEffectObject("SPCRTWPN",Myself) SetGlobal("KyArmUpg","GLOBAL",1) TakeItemReplace("KiyoArm2","KiyoArm1","Kiyone") ~ EXIT IF ~~ THEN REPLY #52587 /* ~Maybe some other time.~ */ GOTO 13 END IF WEIGHT #1 /* Triggers after states #: 458 even though they appear after this state */ ~IfValidForPartyDialogue("Kova") InMyArea("Kova") Global("KKFindCrom","GLOBAL",1) ~ THEN BEGIN 349 // from: SAY #203653 /* ~Good to see ye back in me forge, it is. Be there something that ye need?~ */ IF ~~ THEN EXTERN ~Z#KOVAJ~ 619 IF ~Global("GreetCrom","GLOBAL",0) ~ THEN GOTO 351 IF ~Global("GreetCrom","GLOBAL",0) ~ THEN GOTO 350 END IF ~~ THEN BEGIN 350 // from: 349.2 SAY #203654 /* ~Well, if it isn't the boy who has some fine eye for good work, and fine coin to pay it for it too.~ */ IF ~~ THEN DO ~SetGlobal("GreetCrom","GLOBAL",1) ~ EXTERN ~Z#KOVAJ~ 619 IF ~Global("GreetCrom","GLOBAL",0) ~ THEN DO ~SetGlobal("GreetCrom","GLOBAL",1) ~ GOTO 351 END IF ~~ THEN BEGIN 351 // from: 350.1 349.1 SAY #203655 /* ~How's it been with ye, lad? That blade and those leather robes of yours holding up fine?~ */ IF ~~ THEN EXTERN ~Z#KOVAJ~ 619 END IF ~~ THEN BEGIN 352 // from: SAY #203656 /* ~That so, lad? Forgework is me strength, and with the law and all tis best to look elsewhere.~ */ IF ~~ THEN EXTERN ~Z#KOVAJ~ 620 END IF ~~ THEN BEGIN 353 // from: SAY #203657 /* ~Give me a while to be thinking, me memory's not as good as it once was, not about matters outside of the forge.~ */ IF ~~ THEN GOTO 354 END IF ~~ THEN BEGIN 354 // from: 353.0 SAY #203658 /* ~Aye, remember now. Was someone coming in with a large number of weapons, all kinds of them, asking for me to make something just like that blade of yours.~ */ IF ~~ THEN GOTO 355 END IF ~~ THEN BEGIN 355 // from: 354.0 SAY #203659 /* ~Only, unlike ye, who be knowing what ye want it to be doing. he didn't seem to know what it was supposed to do, just how it looked like. Probably saw yours and wanted one just like it.~ */ IF ~~ THEN EXTERN ~Z#KOVAJ~ 621 IF ~IfValidForPartyDialogue("Yoshimo") InMyArea("Yoshimo") Global("BKovaYoshi","GLOBAL",3) Global("YoshiKnowCrom","GLOBAL",0) ~ THEN EXTERN ~YOSHJ~ 272 END IF ~~ THEN BEGIN 356 // from: SAY #203660 /* ~Don't rightly know, me lad. He was all covered up in his clothes and all, couldn't even see his face if I wanted to. Paid right good gold though. Tall fellow though, even compared to you people. Probably human.~ */ IF ~~ THEN GOTO 357 IF ~IfValidForPartyDialogue("Kiyone") InMyArea("Kiyone") ~ THEN EXTERN ~Z#KIYOJ~ 764 END IF ~~ THEN BEGIN 357 // from: 356.0 SAY #203661 /* ~Not much more to tell ye, he didn't leave much behind apart from his gold. Perhaps he took care not to, but I've learnt it don't usually pay to ask too much of me customers.~ */ IF ~~ THEN EXTERN ~Z#KOVAJ~ 622 END IF ~~ THEN BEGIN 358 // from: SAY #203662 /* ~Not a problem, me lad. All the best with whatever you're looking for.~ */ IF ~~ THEN EXIT END IF ~~ THEN BEGIN 359 // from: 0.7 SAY #203663 /* ~Well, if it isn't the soft footed lad who has some fine eye for good work, and fine coin to pay it for it too.~ */ IF ~~ THEN EXTERN ~Z#KOVAJ~ 625 IF ~IfValidForPartyDialogue("Kova") InMyArea("Kova") Global("GreetCrom","GLOBAL",0) ~ THEN GOTO 360 END IF ~~ THEN BEGIN 360 // from: 359.1 SAY #203664 /* ~How's it been with ye, boy? That blade and those leather robes of yours holding up fine?~ */ IF ~~ THEN EXTERN ~Z#KOVAJ~ 625 END IF ~~ THEN BEGIN 361 // from: SAY #203665 /* ~Glad to hear it, lad. Who is this with ye here? Something I can do for ?~ */ IF ~GlobalGT("CbMalteseArtifact","GLOBAL",4) !GlobalGT("CbCromwellDestroysCrown","AR0334",0) ~ THEN REPLY #99961 /* ~Actually, I understand that you can forge some pretty nice weapons. I was wondering if you could do that for all silver- or metal-work, or just weapons.~ */ DO ~SetGlobal("GreetCrom","GLOBAL",1) ~ GOTO 62 IF ~GlobalGT("CbMalteseArtifact","GLOBAL",4) PartyHasItem("CBMALR6a") Global("SPRITE_IS_DEADCBMALR1","GLOBAL",1) ~ THEN REPLY #99962 /* ~I need you to do something, good Cromwell. I need this artifact destroyed. It is of great evil, and cannot be found. Take it; take it and destroy it.~ */ DO ~SetGlobal("GreetCrom","GLOBAL",1) ~ GOTO 74 IF ~~ THEN REPLY #59658 /* ~Who are you?~ */ DO ~SetGlobal("GreetCrom","GLOBAL",1) ~ GOTO 1 IF ~~ THEN REPLY #59659 /* ~What do you have for sale, here?~ */ DO ~SetGlobal("GreetCrom","GLOBAL",1) ~ GOTO 2 IF ~~ THEN REPLY #59660 /* ~Well, you can stop calling me "", for starters.~ */ DO ~SetGlobal("GreetCrom","GLOBAL",1) ~ GOTO 3 IF ~~ THEN REPLY #59661 /* ~No thanks. I'll be on my way.~ */ DO ~SetGlobal("GreetCrom","GLOBAL",1) ~ GOTO 4 IF ~PartyHasItem("CLFTFG") ~ THEN REPLY #177558 /* ~I have a favor to ask regarding this troll finger.~ */ DO ~SetGlobal("GreetCrom","GLOBAL",1) ~ GOTO 123 IF ~IfValidForPartyDialogue("Yoshimo") InMyArea("Yoshimo") Global("BKovaYoshi","GLOBAL",3) ~ THEN DO ~SetGlobal("GreetCrom","GLOBAL",1) ~ EXTERN ~Z#KOVAJ~ 626 IF ~IfValidForPartyDialogue("Yoshimo") InMyArea("Yoshimo") Global("BKovaYoshi","GLOBAL",3) ~ THEN DO ~SetGlobal("GreetCrom","GLOBAL",1) ~ EXTERN ~YOSHJ~ 275 END IF ~~ THEN BEGIN 362 // from: 58.14 SAY #203666 /* ~Well, I see ye've gone and got this lad here with ye, eh? He has some fine eye for good work, and coin to pay it for it too.~ */ IF ~~ THEN EXTERN ~Z#KOVAJ~ 627 IF ~IfValidForPartyDialogue("Kova") InMyArea("Kova") Global("GreetCrom","GLOBAL",0) ~ THEN GOTO 363 END IF ~~ THEN BEGIN 363 // from: 362.1 SAY #203664 /* ~How's it been with ye, boy? That blade and those leather robes of yours holding up fine?~ */ IF ~~ THEN EXTERN ~Z#KOVAJ~ 627 END IF ~~ THEN BEGIN 364 // from: SAY #203667 /* ~Glad to hear it, lad. Now, something ye be wanting me for, ?~ */ IF ~GlobalGT("CbMalteseArtifact","GLOBAL",4) !GlobalGT("CbCromwellDestroysCrown","AR0334",0) ~ THEN REPLY #99961 /* ~Actually, I understand that you can forge some pretty nice weapons. I was wondering if you could do that for all silver- or metal-work, or just weapons.~ */ DO ~SetGlobal("GreetCrom","GLOBAL",1) ~ GOTO 62 IF ~GlobalGT("CbMalteseArtifact","GLOBAL",4) PartyHasItem("CBMALR6a") Global("SPRITE_IS_DEADCBMALR1","GLOBAL",1) ~ THEN REPLY #99962 /* ~I need you to do something, good Cromwell. I need this artifact destroyed. It is of great evil, and cannot be found. Take it; take it and destroy it.~ */ DO ~SetGlobal("GreetCrom","GLOBAL",1) ~ GOTO 74 IF ~Global("TalkedToCromwell","LOCALS",0) ~ THEN REPLY #59803 /* ~What sorts of things do you forge here?~ */ DO ~SetGlobal("GreetCrom","GLOBAL",1) ~ GOTO 8 IF ~Global("TalkedToCromwell","LOCALS",0) ~ THEN REPLY #59799 /* ~What do you have for sale, here?~ */ DO ~SetGlobal("GreetCrom","GLOBAL",1) ~ GOTO 2 IF ~Global("TalkedToCromwell","LOCALS",1) ~ THEN REPLY #59800 /* ~What sorts of things would you need in order to make something?~ */ DO ~SetGlobal("GreetCrom","GLOBAL",1) ~ GOTO 11 IF ~Global("TalkedToCromwell","LOCALS",1) ~ THEN REPLY #59801 /* ~Do I have anything you could forge into an item?~ */ DO ~SetGlobal("GreetCrom","GLOBAL",1) ~ GOTO 13 IF ~~ THEN REPLY #59802 /* ~No, I don't think so.~ */ DO ~SetGlobal("GreetCrom","GLOBAL",1) ~ GOTO 12 IF ~PartyHasItem("CLFTFG") ~ THEN REPLY #177558 /* ~I have a favor to ask regarding this troll finger.~ */ DO ~SetGlobal("GreetCrom","GLOBAL",1) ~ GOTO 123 IF ~PartyHasItem("KovaDag2") XPGT("Kova",999999) ~ THEN REPLY #202688 /* ~Can you improve Navaeren?~ */ DO ~SetGlobal("GreetCrom","GLOBAL",1) ~ GOTO 345 IF ~PartyHasItem("KovaArm1") XPGT("Kova",999999) ~ THEN REPLY #202689 /* ~Is there a way to enhance Haeloven?~ */ DO ~SetGlobal("GreetCrom","GLOBAL",1) ~ GOTO 346 IF ~PartyHasItem("KiyoBow1") XPGT("Kiyone",999999) ~ THEN REPLY #202690 /* ~Can you improve Eye of the Sentinel?~ */ DO ~SetGlobal("GreetCrom","GLOBAL",1) ~ GOTO 347 IF ~PartyHasItem("KiyoArm1") XPGT("Kiyone",999999) ~ THEN REPLY #202691 /* ~Is there a way to enhance Verdant Vigil?~ */ DO ~SetGlobal("GreetCrom","GLOBAL",1) ~ GOTO 348 IF ~IfValidForPartyDialogue("Yoshimo") PartyHasItem("Npsw02") Global("YoshiKnowCrom","GLOBAL",1) ~ THEN REPLY #202692 /* ~Might you be able to alter Yoshimo's katana to be as versatile as Kova's weapon?~ */ DO ~SetGlobal("GreetCrom","GLOBAL",1) ~ GOTO 342 IF ~IfValidForPartyDialogue("Yoshimo") InMyArea("Yoshimo") Global("BKovaYoshi","GLOBAL",3) ~ THEN DO ~SetGlobal("GreetCrom","GLOBAL",1) ~ EXTERN ~Z#KOVAJ~ 628 IF ~IfValidForPartyDialogue("Yoshimo") InMyArea("Yoshimo") Global("BKovaYoshi","GLOBAL",3) ~ THEN DO ~SetGlobal("GreetCrom","GLOBAL",1) ~ EXTERN ~YOSHJ~ 276 END IF ~~ THEN BEGIN 365 // from: 475.64 471.64 467.64 463.64 459.64 445.63 441.63 437.63 433.63 428.63 424.63 420.63 416.63 400.63 389.63 378.63 13.64 SAY #206770 /* ~What's this, then? A special family's shield?~ */ IF ~OR(2) PartyHasItem("AMUL14") PartyHasItem("RING06") ~ THEN GOTO 367 IF ~!PartyHasItem("AMUL14") !PartyHasItem("RING06") ~ THEN GOTO 366 END IF ~~ THEN BEGIN 366 // from: 365.1 SAY #206771 /* ~I can forge a powerful shield out of this, if ye bring me a ring or a necklace of protection.~ */ IF ~~ THEN GOTO 373 END IF ~~ THEN BEGIN 367 // from: 365.0 SAY #206772 /* ~Aye, ye've collected all I need to forge this shield into something more powerful.~ */ IF ~PartyHasItem("AMUL14") !PartyHasItem("RING06") ~ THEN GOTO 368 IF ~!PartyHasItem("AMUL14") PartyHasItem("RING06") ~ THEN GOTO 369 IF ~PartyHasItem("AMUL14") PartyHasItem("RING06") ~ THEN GOTO 370 END IF ~~ THEN BEGIN 368 // from: 367.0 SAY #206773 /* ~All I'd have to use is yer necklace of protection along with the shield.~ */ IF ~~ THEN REPLY #206774 /* ~What would that take?~ */ GOTO 372 IF ~~ THEN REPLY #206775 /* ~I'd rather wait until I have a ring of protection instead.~ */ GOTO 373 IF ~~ THEN REPLY #206776 /* ~No, I'm not interested. Is there anything else you can use?~ */ GOTO 373 END IF ~~ THEN BEGIN 369 // from: 367.1 SAY #206777 /* ~All I'd have to use is yer ring of protection along with the shield.~ */ IF ~~ THEN REPLY #206774 /* ~What would that take?~ */ GOTO 371 IF ~~ THEN REPLY #206778 /* ~I'd rather wait until I have a necklace of protection instead.~ */ GOTO 373 IF ~~ THEN REPLY #206776 /* ~No, I'm not interested. Is there anything else you can use?~ */ GOTO 373 END IF ~~ THEN BEGIN 370 // from: 367.2 SAY #206779 /* ~All I'd have to use is either yer ring or yer necklace of protection along with the shield.~ */ IF ~~ THEN REPLY #206780 /* ~Take the ring. What would that cost?~ */ GOTO 371 IF ~~ THEN REPLY #206781 /* ~Take the necklace. What would that cost?~ */ GOTO 372 IF ~~ THEN REPLY #206778 /* ~I'd rather wait until I have a necklace of protection instead.~ */ GOTO 373 IF ~~ THEN REPLY #206776 /* ~No, I'm not interested. Is there anything else you can use?~ */ GOTO 373 END IF ~~ THEN BEGIN 371 // from: 370.0 369.0 SAY #206782 /* ~It'll cost ye 5000 gold and without me apprentice, ye'll need to stay on a day and help me run the forge.~ */ IF ~PartyGoldGT(7499) ~ THEN REPLY #206783 /* ~Yes, let's do it.~ */ DO ~SetGlobal("C#AjanForgeShieldRing","GLOBAL",1) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(5000) DestroyGold(5000) ~ GOTO 56 IF ~~ THEN REPLY #206776 /* ~No, I'm not interested. Is there anything else you can use?~ */ GOTO 373 END IF ~~ THEN BEGIN 372 // from: 370.1 368.0 SAY #206782 /* ~It'll cost ye 5000 gold and without me apprentice, ye'll need to stay on a day and help me run the forge.~ */ IF ~PartyGoldGT(7499) ~ THEN REPLY #206783 /* ~Yes, let's do it.~ */ DO ~SetGlobal("C#AjanForgeShieldAmulet","GLOBAL",1) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(5000) DestroyGold(5000) ~ GOTO 56 IF ~~ THEN REPLY #206776 /* ~No, I'm not interested. Is there anything else you can use?~ */ GOTO 373 END IF ~~ THEN BEGIN 373 // from: 372.1 371.1 370.3 370.2 369.2 369.1 368.2 368.1 366.0 SAY #206784 /* ~Well, let's see what ye've got then.~ */ IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#bchide") !PartyHasItem("m#wskin") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(2) PartyHasItem("sw1h40") PartyHasItem("m#jbrace") ~ THEN DO ~ActionOverride("M#Amber",SetDialogue("m#ambern")) ~ GOTO 321 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npshld") ~ THEN GOTO 144 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun22") ~ THEN GOTO 158 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun18") ~ THEN GOTO 162 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun23") ~ THEN GOTO 166 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot02") ~ THEN GOTO 170 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot03") ~ THEN GOTO 174 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot04") ~ THEN GOTO 178 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot05") ~ THEN GOTO 182 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("bow10") ~ THEN GOTO 186 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("chan14") ~ THEN GOTO 195 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm04") ~ THEN GOTO 208 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm06") ~ THEN GOTO 212 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("leat20") ~ THEN GOTO 216 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npplat") ~ THEN GOTO 220 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("plat06") ~ THEN GOTO 236 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring06") ~ THEN GOTO 240 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring07") ~ THEN GOTO 244 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck16") ~ THEN GOTO 261 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck17") ~ THEN GOTO 265 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld25") ~ THEN GOTO 269 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld17") ~ THEN GOTO 273 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper06") ~ THEN GOTO 277 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper07") ~ THEN GOTO 281 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper08") ~ THEN GOTO 285 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("staf15") PartyHasItem("staf16") PartyHasItem("staf17") ~ THEN GOTO 289 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("staf14") ~ THEN GOTO 293 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h31") ~ THEN GOTO 297 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h51") ~ THEN GOTO 301 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h52") ~ THEN GOTO 307 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw2h14") ~ THEN GOTO 311 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npchan") ~ THEN GOTO 315 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") OR(2) PartyHasItem("m#bchide") PartyHasItem("m#wskin") ~ THEN GOTO 331 END IF ~~ THEN BEGIN 374 // from: 475.65 471.65 467.65 463.65 459.65 445.64 441.64 437.64 433.64 428.64 424.64 420.64 416.64 400.64 389.64 13.65 SAY #206785 /* ~What's this, then, a nice bastard sword?~ */ IF ~PartyHasItem("SCRL94") ~ THEN GOTO 376 IF ~!PartyHasItem("SCRL94") ~ THEN GOTO 375 END IF ~~ THEN BEGIN 375 // from: 374.1 SAY #206786 /* ~I can forge a powerful sword out of this, if ye bring me a scroll of Resist Fear.~ */ IF ~~ THEN GOTO 378 END IF ~~ THEN BEGIN 376 // from: 374.0 SAY #206787 /* ~Ye've collected all I need to forge this sword into something more powerful. All I'd have to use is yer scroll of Resist Fear along with the sword.~ */ IF ~~ THEN REPLY #206774 /* ~What would that take?~ */ GOTO 377 IF ~~ THEN REPLY #206776 /* ~No, I'm not interested. Is there anything else you can use?~ */ GOTO 378 END IF ~~ THEN BEGIN 377 // from: 376.0 SAY #206782 /* ~It'll cost ye 5000 gold and without me apprentice, ye'll need to stay on a day and help me run the forge.~ */ IF ~PartyGoldGT(7499) ~ THEN REPLY #206783 /* ~Yes, let's do it.~ */ DO ~SetGlobal("C#AjanForgeSword","GLOBAL",1) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(5000) DestroyGold(5000) ~ GOTO 56 IF ~~ THEN REPLY #206776 /* ~No, I'm not interested. Is there anything else you can use?~ */ GOTO 378 END IF ~~ THEN BEGIN 378 // from: 377.1 376.1 375.0 SAY #206784 /* ~Well, let's see what ye've got then.~ */ IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#bchide") !PartyHasItem("m#wskin") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(2) PartyHasItem("sw1h40") PartyHasItem("m#jbrace") ~ THEN DO ~ActionOverride("M#Amber",SetDialogue("m#ambern")) ~ GOTO 321 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npshld") ~ THEN GOTO 144 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun22") ~ THEN GOTO 158 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun18") ~ THEN GOTO 162 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun23") ~ THEN GOTO 166 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot02") ~ THEN GOTO 170 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot03") ~ THEN GOTO 174 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot04") ~ THEN GOTO 178 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot05") ~ THEN GOTO 182 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("bow10") ~ THEN GOTO 186 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("chan14") ~ THEN GOTO 195 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm04") ~ THEN GOTO 208 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm06") ~ THEN GOTO 212 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("leat20") ~ THEN GOTO 216 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npplat") ~ THEN GOTO 220 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("plat06") ~ THEN GOTO 236 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring06") ~ THEN GOTO 240 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring07") ~ THEN GOTO 244 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck16") ~ THEN GOTO 261 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck17") ~ THEN GOTO 265 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld25") ~ THEN GOTO 269 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld17") ~ THEN GOTO 273 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper06") ~ THEN GOTO 277 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper07") ~ THEN GOTO 281 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper08") ~ THEN GOTO 285 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("staf15") PartyHasItem("staf16") PartyHasItem("staf17") ~ THEN GOTO 289 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("staf14") ~ THEN GOTO 293 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h31") ~ THEN GOTO 297 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h51") ~ THEN GOTO 301 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h52") ~ THEN GOTO 307 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw2h14") ~ THEN GOTO 311 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npchan") ~ THEN GOTO 315 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") OR(2) PartyHasItem("m#bchide") PartyHasItem("m#wskin") ~ THEN GOTO 331 IF ~PartyHasItem("C#AJSHLD") ~ THEN GOTO 365 END IF ~~ THEN BEGIN 379 // from: SAY #207681 /* ~What can I do for ye?~ */ IF ~~ THEN EXTERN ~C#AJANJ~ 1353 END IF ~~ THEN BEGIN 380 // from: SAY #207683 /* ~As ye wish.~ */ IF ~~ THEN DO ~FadeToColor([20.0],0) Wait(2) FadeFromColor([20.0],0) Wait(1) ~ GOTO 381 END IF ~~ THEN BEGIN 381 // from: 380.0 SAY #207684 /* ~Hehe. Ye're makin' a mountain out of a mole-hill, laddie. All ye need do is show it a bit o' sunlight, and you'll be good as new.~ */ IF ~~ THEN EXTERN ~C#AJANJ~ 1354 END IF ~~ THEN BEGIN 382 // from: SAY #207686 /* ~So, ye did, eh?~ */ IF ~~ THEN EXTERN ~C#AJANJ~ 1355 END IF ~~ THEN BEGIN 383 // from: SAY #207687 /* ~Lad, ye have to *properly* expose it to sunlight, ye know...~ */ IF ~~ THEN EXTERN ~C#AJANJ~ 1356 END IF ~~ THEN BEGIN 384 // from: SAY #207689 /* ~I s'pose ye could dance a bit, or wave some leaves about, if the fit took ye, but a little daylight's all ye need.~ */ IF ~~ THEN GOTO 385 END IF ~~ THEN BEGIN 385 // from: 384.0 SAY #207690 /* ~Now about the fee... that'll be 100 gold for consultation, if ye don't mind.~ */ IF ~~ THEN EXTERN ~C#AJANJ~ 1357 END IF ~~ THEN BEGIN 386 // from: SAY #207693 /* ~Ah, don't ye worry, lad, keep the money to yerself. This is one of these things that ye want to remember and tell to ye grandchildren when yer old...~ */ IF ~~ THEN EXTERN ~C#AJANJ~ 1359 END IF ~~ THEN BEGIN 387 // from: 475.66 471.66 467.66 463.66 459.66 445.65 441.65 437.65 433.65 428.65 424.65 420.65 416.65 400.65 13.66 SAY #236493 /* ~Hmmm...what's this? This sword looks old, and banged up enough to prove it. Rare to see such a blade at me smithy with still the ghost of the owner attached. I bet I can fix this up for ye for a price, aye?~ */ IF ~PartyHasItem("SWGHOST") ~ THEN REPLY #236494 /* ~Old sword? Are you talking about Relic? What would that involve?~ */ GOTO 388 IF ~~ THEN REPLY #59719 /* ~I don't think so. Do I have anything else useful?~ */ GOTO 389 END IF ~~ THEN BEGIN 388 // from: 387.0 SAY #59771 /* ~Two things, me friend. It will cost ye 5,000 gp for the work, no less, and without an apprentice, ye'll have to stay here a full day and help me run the forge.~ */ IF ~PartyGoldGT(4999) ~ THEN REPLY #59793 /* ~That sounds fine. Let's do it.~ */ DO ~TakePartyGold(5000) DestroyGold(5000) SetGlobal("SK#Relic","GLOBAL",1) SetGlobal("ForgeStuff","GLOBAL",1) ~ GOTO 56 IF ~~ THEN REPLY #193418 /* ~No, I don't think so. Do I have anything else useful?~ */ DO ~SetGlobal("ForgeItem","GLOBAL",0) ~ GOTO 389 IF ~~ THEN REPLY #236495 /* ~No, I don't think so. I think I'll be going, now.~ */ DO ~SetGlobal("ForgeItem","GLOBAL",0) ~ GOTO 12 END IF ~~ THEN BEGIN 389 // from: 388.1 387.1 SAY #59723 /* ~I'll take another look for meself, here. Hmmmn...~ */ IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#bchide") !PartyHasItem("m#wskin") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(2) PartyHasItem("sw1h40") PartyHasItem("m#jbrace") ~ THEN DO ~ActionOverride("M#Amber",SetDialogue("m#ambern")) ~ GOTO 321 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npshld") ~ THEN GOTO 144 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun22") ~ THEN GOTO 158 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun18") ~ THEN GOTO 162 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun23") ~ THEN GOTO 166 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot02") ~ THEN GOTO 170 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot03") ~ THEN GOTO 174 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot04") ~ THEN GOTO 178 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot05") ~ THEN GOTO 182 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("bow10") ~ THEN GOTO 186 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("chan14") ~ THEN GOTO 195 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm04") ~ THEN GOTO 208 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm06") ~ THEN GOTO 212 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("leat20") ~ THEN GOTO 216 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npplat") ~ THEN GOTO 220 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("plat06") ~ THEN GOTO 236 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring06") ~ THEN GOTO 240 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring07") ~ THEN GOTO 244 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck16") ~ THEN GOTO 261 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck17") ~ THEN GOTO 265 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld25") ~ THEN GOTO 269 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld17") ~ THEN GOTO 273 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper06") ~ THEN GOTO 277 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper07") ~ THEN GOTO 281 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper08") ~ THEN GOTO 285 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("staf15") PartyHasItem("staf16") PartyHasItem("staf17") ~ THEN GOTO 289 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("staf14") ~ THEN GOTO 293 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h31") ~ THEN GOTO 297 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h51") ~ THEN GOTO 301 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h52") ~ THEN GOTO 307 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw2h14") ~ THEN GOTO 311 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npchan") ~ THEN GOTO 315 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") OR(2) PartyHasItem("m#bchide") PartyHasItem("m#wskin") ~ THEN GOTO 331 IF ~PartyHasItem("C#AJSHLD") ~ THEN GOTO 365 IF ~PartyHasItem("C#AJ0012") ~ THEN GOTO 374 END IF ~~ THEN BEGIN 390 // from: SAY #235313 /* ~Not all the damage to the sword be removed, but enough to make it more useful when ye swing at something.~ */ IF ~~ THEN DO ~SetGlobal("CromwellRelic2","GLOBAL",1) ~ EXTERN ~SW2HOST~ 32 END IF ~~ THEN BEGIN 391 // from: SAY #235315 /* ~Ye had so much rust in yer mouth ye should be glad ye can talk at all!~ */ IF ~~ THEN EXTERN ~SW2HOST~ 33 END IF ~~ THEN BEGIN 392 // from: SAY #235317 /* ~There be never such an ungrateful piece of metal!~ */ IF ~~ THEN EXTERN ~SW2HOST~ 34 END IF ~~ THEN BEGIN 393 // from: SAY #235319 /* ~By the Soul Forger, if that sword gets any more dents in it, I willna be sharpenin' it again!~ */ IF ~~ THEN EXIT END IF ~~ THEN BEGIN 394 // from: 475.67 471.67 467.67 463.67 459.67 445.66 441.66 437.66 433.66 428.66 424.66 420.66 416.66 13.67 SAY #277781 /* ~Hmmm... what's this then? Oy, lassie, this your armour?~ */ IF ~~ THEN EXTERN ~G#TYRISJ~ 258 END IF ~~ THEN BEGIN 395 // from: SAY #277782 /* ~Ye've got some spirit in ya, girly. I like that.~ */ IF ~~ THEN GOTO 396 END IF ~~ THEN BEGIN 396 // from: 395.0 SAY #277783 /* ~Truth is, ah don't think ah could damage it if ah wanted to. Look at the state it's in! The stitching is comin' out, these bone plates are fallin' off and the whole thing is burned to buggery if you ask me!~ */ IF ~~ THEN GOTO 397 END IF ~~ THEN BEGIN 397 // from: 396.0 SAY #277784 /* ~So how 'bout this, for a modest sum ah could fix this up for ye. Good as new. Better than, actually, 'cause I could do something about that fire damage. How 'bout it?~ */ IF ~~ THEN EXTERN ~G#TYRISJ~ 259 END IF ~~ THEN BEGIN 398 // from: SAY #277785 /* ~Oh is holding the purse strings then? So what's it to be? Do you want me to fix up this lassie's armour?~ */ IF ~~ THEN REPLY #59767 /* ~What's involved in that?~ */ GOTO 399 IF ~~ THEN REPLY #277786 /* ~No, I don't think so. Do we have anything else of use?~ */ GOTO 400 END IF ~~ THEN BEGIN 399 // from: 402.0 398.0 SAY #59771 /* ~Two things, me friend. It will cost ye 5,000 gp for the work, no less, and without an apprentice, ye'll have to stay here a full day and help me run the forge.~ */ IF ~PartyGoldGT(7499) ~ THEN REPLY #206783 /* ~Yes, let's do it.~ */ DO ~SetGlobal("G#TF.UpgradeArmour","GLOBAL",1) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(5500) DestroyGold(5500) ~ GOTO 56 IF ~~ THEN REPLY #277786 /* ~No, I don't think so. Do we have anything else of use?~ */ GOTO 400 END IF ~~ THEN BEGIN 400 // from: 402.1 399.1 398.1 SAY #277787 /* ~Sorry girly, looks like 's a tight one. Let's have a look what else ye've got...~ */ IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#bchide") !PartyHasItem("m#wskin") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(2) PartyHasItem("sw1h40") PartyHasItem("m#jbrace") ~ THEN DO ~ActionOverride("M#Amber",SetDialogue("m#ambern")) ~ GOTO 321 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npshld") ~ THEN GOTO 144 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun22") ~ THEN GOTO 158 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun18") ~ THEN GOTO 162 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun23") ~ THEN GOTO 166 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot02") ~ THEN GOTO 170 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot03") ~ THEN GOTO 174 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot04") ~ THEN GOTO 178 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot05") ~ THEN GOTO 182 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("bow10") ~ THEN GOTO 186 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("chan14") ~ THEN GOTO 195 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm04") ~ THEN GOTO 208 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm06") ~ THEN GOTO 212 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("leat20") ~ THEN GOTO 216 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npplat") ~ THEN GOTO 220 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("plat06") ~ THEN GOTO 236 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring06") ~ THEN GOTO 240 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring07") ~ THEN GOTO 244 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck16") ~ THEN GOTO 261 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck17") ~ THEN GOTO 265 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld25") ~ THEN GOTO 269 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld17") ~ THEN GOTO 273 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper06") ~ THEN GOTO 277 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper07") ~ THEN GOTO 281 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper08") ~ THEN GOTO 285 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("staf15") PartyHasItem("staf16") PartyHasItem("staf17") ~ THEN GOTO 289 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("staf14") ~ THEN GOTO 293 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h31") ~ THEN GOTO 297 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h51") ~ THEN GOTO 301 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h52") ~ THEN GOTO 307 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw2h14") ~ THEN GOTO 311 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npchan") ~ THEN GOTO 315 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") OR(2) PartyHasItem("m#bchide") PartyHasItem("m#wskin") ~ THEN GOTO 331 IF ~PartyHasItem("C#AJSHLD") ~ THEN GOTO 365 IF ~PartyHasItem("C#AJ0012") ~ THEN GOTO 374 IF ~PartyHasItem("SWGHOST") ~ THEN GOTO 387 END IF ~~ THEN BEGIN 401 // from: 475.68 471.68 467.68 463.68 459.68 445.67 441.67 437.67 433.67 428.67 424.67 420.67 416.67 13.68 SAY #277788 /* ~Ye've still got this armour ah see? Gods, ah cannae believe it, but it seems worse than ah remember it. The offer's still on the table if ya want it.~ */ IF ~~ THEN EXTERN ~G#TYRISJ~ 260 END IF ~~ THEN BEGIN 402 // from: SAY #277789 /* ~So what'll it be? Do you want me to fix up this lassie's armour?~ */ IF ~~ THEN REPLY #59767 /* ~What's involved in that?~ */ GOTO 399 IF ~~ THEN REPLY #277786 /* ~No, I don't think so. Do we have anything else of use?~ */ GOTO 400 END IF ~~ THEN BEGIN 403 // from: 58.15 SAY #296111 /* ~Say what ?~ */ IF ~~ THEN REPLY #296112 /* ~Well erm basically, I've been told you have an item of mine, and well I've been following these clues, and the last one pointed to you...~ */ GOTO 404 IF ~~ THEN REPLY #296113 /* ~Oh er... nothing, nevermind.~ */ GOTO 405 END IF ~~ THEN BEGIN 404 // from: 403.0 SAY #296114 /* ~Do ye have any idea how insane that sounds? Some white bearded ol' Dwarf led ye to me?~ */ IF ~~ THEN REPLY #296115 /* ~You're right... sorry~ */ GOTO 406 IF ~~ THEN REPLY #296116 /* ~No... seriously! I have been promised some kind of present, and I want it!~ */ GOTO 407 END IF ~~ THEN BEGIN 405 // from: 403.1 SAY #296117 /* ~Fine whatever ye say ~ */ IF ~~ THEN EXIT END IF ~~ THEN BEGIN 406 // from: 404.0 SAY #296118 /* ~Ok then, whate'er ye say~ */ IF ~~ THEN EXIT END IF ~~ THEN BEGIN 407 // from: 404.1 SAY #161635 /* ~Really?~ */ IF ~~ THEN REPLY #28421 /* ~Yes!~ */ GOTO 412 IF ~~ THEN REPLY #296119 /* ~No not really...~ */ GOTO 408 END IF ~~ THEN BEGIN 408 // from: 407.1 SAY #296120 /* ~Your loss!~ */ IF ~~ THEN REPLY #296121 /* ~Wha?~ */ GOTO 409 END IF ~~ THEN BEGIN 409 // from: 408.0 SAY #296122 /* ~Hahaha, me brother bob seems to 'ave scammed ye !~ */ IF ~~ THEN REPLY #296123 /* ~Ohhhhh.... could I just have the item?~ */ GOTO 410 END IF ~~ THEN BEGIN 410 // from: 409.0 SAY #296124 /* ~Well....~ */ IF ~~ THEN GOTO 411 END IF ~~ THEN BEGIN 411 // from: 410.0 SAY #296125 /* ~OK~ */ IF ~~ THEN DO ~GiveItemCreate("MDSiplat",LastTalkedToBy(Myself),0,0,0) ~ EXIT END IF ~~ THEN BEGIN 412 // from: 407.0 SAY #296126 /* ~Ok, it's yours... well done, I did'nae think ye'd make it.~ */ IF ~~ THEN DO ~GiveItemCreate("MDSiplat",LastTalkedToBy(Myself),0,0,0) ~ EXIT END IF ~~ THEN BEGIN 413 // from: 475.69 471.69 467.69 463.69 459.69 445.68 441.68 437.68 433.68 428.68 424.68 420.68 13.69 SAY #304803 /* ~I see ye have a magical ring of protection...~ */ IF ~OR(2) !NumItemsPartyGT("RING06",1) !PartyHasItem("MISC42") ~ THEN GOTO 414 IF ~NumItemsPartyGT("RING06",1) PartyHasItem("MISC42") ~ THEN GOTO 415 END IF ~~ THEN BEGIN 414 // from: 413.0 SAY #304804 /* ~With a diamond, two of these rings can be melt into a more powerful item.~ */ IF ~~ THEN GOTO 416 END IF ~~ THEN BEGIN 415 // from: 413.1 SAY #304805 /* ~If ye give me two of these, a diamond, and 5000 gold, I can make ye a new ring that be twice as effective.~ */ IF ~PartyGoldLT(5000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 416 IF ~PartyGoldGT(4999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("D1CromUPG","AR0334",1) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(5000) TakePartyItemNum("RING06",2) DestroyItem("RING06") TakePartyItemNum("MISC42",1) DestroyItem("MISC42") DestroyGold(5000) ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 416 END IF ~~ THEN BEGIN 416 // from: 415.2 415.0 414.0 SAY #304806 /* ~Well, let's see what else ye got...~ */ IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#bchide") !PartyHasItem("m#wskin") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(2) PartyHasItem("sw1h40") PartyHasItem("m#jbrace") ~ THEN DO ~ActionOverride("M#Amber",SetDialogue("m#ambern")) ~ GOTO 321 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npshld") ~ THEN GOTO 144 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun22") ~ THEN GOTO 158 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun18") ~ THEN GOTO 162 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun23") ~ THEN GOTO 166 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot02") ~ THEN GOTO 170 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot03") ~ THEN GOTO 174 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot04") ~ THEN GOTO 178 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot05") ~ THEN GOTO 182 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("bow10") ~ THEN GOTO 186 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("chan14") ~ THEN GOTO 195 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm04") ~ THEN GOTO 208 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm06") ~ THEN GOTO 212 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("leat20") ~ THEN GOTO 216 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npplat") ~ THEN GOTO 220 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("plat06") ~ THEN GOTO 236 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring06") ~ THEN GOTO 240 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring07") ~ THEN GOTO 244 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck16") ~ THEN GOTO 261 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck17") ~ THEN GOTO 265 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld25") ~ THEN GOTO 269 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld17") ~ THEN GOTO 273 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper06") ~ THEN GOTO 277 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper07") ~ THEN GOTO 281 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper08") ~ THEN GOTO 285 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("staf15") PartyHasItem("staf16") PartyHasItem("staf17") ~ THEN GOTO 289 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("staf14") ~ THEN GOTO 293 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h31") ~ THEN GOTO 297 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h51") ~ THEN GOTO 301 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h52") ~ THEN GOTO 307 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw2h14") ~ THEN GOTO 311 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npchan") ~ THEN GOTO 315 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") OR(2) PartyHasItem("m#bchide") PartyHasItem("m#wskin") ~ THEN GOTO 331 IF ~PartyHasItem("C#AJSHLD") ~ THEN GOTO 365 IF ~PartyHasItem("C#AJ0012") ~ THEN GOTO 374 IF ~PartyHasItem("SWGHOST") ~ THEN GOTO 387 IF ~PartyHasItem("G#TFARMR") IfValidForPartyDialogue("G#Tyris") !StateCheck("G#Tyris",CD_STATE_NOTVALID) !Global("G#TF.CromSeenArmour","GLOBAL",1) ~ THEN DO ~SetGlobal("G#TF.CromSeenArmour","GLOBAL",1) ~ GOTO 394 IF ~PartyHasItem("G#TFARMR") IfValidForPartyDialogue("G#Tyris") !StateCheck("G#Tyris",CD_STATE_NOTVALID) Global("G#TF.CromSeenArmour","GLOBAL",1) ~ THEN GOTO 401 END IF ~~ THEN BEGIN 417 // from: 475.70 471.70 467.70 463.70 459.70 445.69 441.69 437.69 433.69 428.69 424.69 13.70 SAY #304807 /* ~I see ye have a magical cloak of protection...~ */ IF ~OR(2) !NumItemsPartyGT("CLCK01",1) !PartyHasItem("MISC45") ~ THEN GOTO 418 IF ~NumItemsPartyGT("CLCK01",1) PartyHasItem("MISC45") ~ THEN GOTO 419 END IF ~~ THEN BEGIN 418 // from: 417.0 SAY #304808 /* ~With a rogue stone, two of these cloaks can be melt into a more powerful item.~ */ IF ~~ THEN GOTO 420 END IF ~~ THEN BEGIN 419 // from: 417.1 SAY #304809 /* ~If ye give me two of these, a rogue stone, and 5000 gold, I can make ye a new cape that be twice as effective.~ */ IF ~PartyGoldLT(5000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 420 IF ~PartyGoldGT(4999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("D1CromUPG","AR0334",2) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(5000) TakePartyItemNum("CLCK01",2) DestroyItem("CLCK01") TakePartyItemNum("MISC45",1) DestroyItem("MISC45") DestroyGold(5000) ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 420 END IF ~~ THEN BEGIN 420 // from: 419.2 419.0 418.0 SAY #304806 /* ~Well, let's see what else ye got...~ */ IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#bchide") !PartyHasItem("m#wskin") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(2) PartyHasItem("sw1h40") PartyHasItem("m#jbrace") ~ THEN DO ~ActionOverride("M#Amber",SetDialogue("m#ambern")) ~ GOTO 321 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npshld") ~ THEN GOTO 144 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun22") ~ THEN GOTO 158 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun18") ~ THEN GOTO 162 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun23") ~ THEN GOTO 166 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot02") ~ THEN GOTO 170 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot03") ~ THEN GOTO 174 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot04") ~ THEN GOTO 178 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot05") ~ THEN GOTO 182 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("bow10") ~ THEN GOTO 186 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("chan14") ~ THEN GOTO 195 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm04") ~ THEN GOTO 208 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm06") ~ THEN GOTO 212 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("leat20") ~ THEN GOTO 216 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npplat") ~ THEN GOTO 220 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("plat06") ~ THEN GOTO 236 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring06") ~ THEN GOTO 240 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring07") ~ THEN GOTO 244 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck16") ~ THEN GOTO 261 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck17") ~ THEN GOTO 265 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld25") ~ THEN GOTO 269 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld17") ~ THEN GOTO 273 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper06") ~ THEN GOTO 277 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper07") ~ THEN GOTO 281 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper08") ~ THEN GOTO 285 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("staf15") PartyHasItem("staf16") PartyHasItem("staf17") ~ THEN GOTO 289 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("staf14") ~ THEN GOTO 293 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h31") ~ THEN GOTO 297 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h51") ~ THEN GOTO 301 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h52") ~ THEN GOTO 307 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw2h14") ~ THEN GOTO 311 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npchan") ~ THEN GOTO 315 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") OR(2) PartyHasItem("m#bchide") PartyHasItem("m#wskin") ~ THEN GOTO 331 IF ~PartyHasItem("C#AJSHLD") ~ THEN GOTO 365 IF ~PartyHasItem("C#AJ0012") ~ THEN GOTO 374 IF ~PartyHasItem("SWGHOST") ~ THEN GOTO 387 IF ~PartyHasItem("G#TFARMR") IfValidForPartyDialogue("G#Tyris") !StateCheck("G#Tyris",CD_STATE_NOTVALID) !Global("G#TF.CromSeenArmour","GLOBAL",1) ~ THEN DO ~SetGlobal("G#TF.CromSeenArmour","GLOBAL",1) ~ GOTO 394 IF ~PartyHasItem("G#TFARMR") IfValidForPartyDialogue("G#Tyris") !StateCheck("G#Tyris",CD_STATE_NOTVALID) Global("G#TF.CromSeenArmour","GLOBAL",1) ~ THEN GOTO 401 IF ~PartyHasItem("RING06") ~ THEN GOTO 413 END IF ~~ THEN BEGIN 421 // from: 475.71 471.71 467.71 463.71 459.71 445.70 441.70 437.70 433.70 428.70 13.71 SAY #304810 /* ~Ay, now... this could be something, here. Some kind of metal, eh? Let me see...~ */ IF ~!PartyHasItem("BLUN12") ~ THEN GOTO 422 IF ~PartyHasItem("BLUN12") ~ THEN GOTO 423 END IF ~~ THEN BEGIN 422 // from: 421.0 SAY #304811 /* ~It be illithium, aye? A rare metal, indeed. If ye ever get ahold of a Mace of Disruption, a coating of illithium would improve it vastly.~ */ IF ~~ THEN GOTO 424 END IF ~~ THEN BEGIN 423 // from: 421.1 SAY #304812 /* ~Ye've illithium there, aye? And a Mace of Disruption, as well. I could apply a coating to yer mace and improve it greatly, giving ye more protection from the undead.~ */ IF ~PartyGoldLT(7500) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 424 IF ~PartyGoldGT(7499) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("D1CromUPG","AR0334",3) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(5000) TakePartyItemNum("BLUN12",1) DestroyItem("BLUN12") TakePartyItemNum("D1ILLITH",1) DestroyItem("D1ILLITH") DestroyGold(7500) ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 424 END IF ~~ THEN BEGIN 424 // from: 423.2 423.0 422.0 SAY #304806 /* ~Well, let's see what else ye got...~ */ IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#bchide") !PartyHasItem("m#wskin") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(2) PartyHasItem("sw1h40") PartyHasItem("m#jbrace") ~ THEN DO ~ActionOverride("M#Amber",SetDialogue("m#ambern")) ~ GOTO 321 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npshld") ~ THEN GOTO 144 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun22") ~ THEN GOTO 158 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun18") ~ THEN GOTO 162 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun23") ~ THEN GOTO 166 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot02") ~ THEN GOTO 170 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot03") ~ THEN GOTO 174 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot04") ~ THEN GOTO 178 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot05") ~ THEN GOTO 182 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("bow10") ~ THEN GOTO 186 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("chan14") ~ THEN GOTO 195 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm04") ~ THEN GOTO 208 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm06") ~ THEN GOTO 212 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("leat20") ~ THEN GOTO 216 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npplat") ~ THEN GOTO 220 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("plat06") ~ THEN GOTO 236 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring06") ~ THEN GOTO 240 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring07") ~ THEN GOTO 244 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck16") ~ THEN GOTO 261 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck17") ~ THEN GOTO 265 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld25") ~ THEN GOTO 269 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld17") ~ THEN GOTO 273 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper06") ~ THEN GOTO 277 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper07") ~ THEN GOTO 281 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper08") ~ THEN GOTO 285 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("staf15") PartyHasItem("staf16") PartyHasItem("staf17") ~ THEN GOTO 289 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("staf14") ~ THEN GOTO 293 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h31") ~ THEN GOTO 297 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h51") ~ THEN GOTO 301 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h52") ~ THEN GOTO 307 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw2h14") ~ THEN GOTO 311 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npchan") ~ THEN GOTO 315 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") OR(2) PartyHasItem("m#bchide") PartyHasItem("m#wskin") ~ THEN GOTO 331 IF ~PartyHasItem("C#AJSHLD") ~ THEN GOTO 365 IF ~PartyHasItem("C#AJ0012") ~ THEN GOTO 374 IF ~PartyHasItem("SWGHOST") ~ THEN GOTO 387 IF ~PartyHasItem("G#TFARMR") IfValidForPartyDialogue("G#Tyris") !StateCheck("G#Tyris",CD_STATE_NOTVALID) !Global("G#TF.CromSeenArmour","GLOBAL",1) ~ THEN DO ~SetGlobal("G#TF.CromSeenArmour","GLOBAL",1) ~ GOTO 394 IF ~PartyHasItem("G#TFARMR") IfValidForPartyDialogue("G#Tyris") !StateCheck("G#Tyris",CD_STATE_NOTVALID) Global("G#TF.CromSeenArmour","GLOBAL",1) ~ THEN GOTO 401 IF ~PartyHasItem("RING06") ~ THEN GOTO 413 IF ~PartyHasItem("CLCK01") ~ THEN GOTO 417 END IF ~~ THEN BEGIN 425 // from: 475.72 471.72 467.72 463.72 459.72 445.71 441.71 437.71 433.71 13.72 SAY #304813 /* ~Eh? What's this? A King's sword?~ */ IF ~OR(2) !PartyHasItem("SCRL96") !PartyHasItem("MISC44") ~ THEN GOTO 426 IF ~PartyHasItem("SCRL96") PartyHasItem("MISC44") ~ THEN GOTO 427 END IF ~~ THEN BEGIN 426 // from: 425.0 SAY #304814 /* ~With a King's Tear and a scroll of Mirror Image it can be reforged into a more powerful blade.~ */ IF ~~ THEN GOTO 428 END IF ~~ THEN BEGIN 427 // from: 425.1 SAY #304815 /* ~If ye give me a King's Tear, a scroll of Mirror Image, and 7500 gold, I can make ye a sword truly worthy of a king.~ */ IF ~PartyGoldLT(7500) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 428 IF ~PartyGoldGT(7499) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("D1CromUPG","AR0334",4) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(7500) TakePartyItemNum("SW1H26",1) DestroyItem("SW1H26") TakePartyItemNum("SCRL96",1) DestroyItem("SCRL96") TakePartyItemNum("MISC44",1) DestroyItem("MISC44") DestroyGold(7500) ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 428 END IF ~~ THEN BEGIN 428 // from: 427.2 427.0 426.0 SAY #304806 /* ~Well, let's see what else ye got...~ */ IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#bchide") !PartyHasItem("m#wskin") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(2) PartyHasItem("sw1h40") PartyHasItem("m#jbrace") ~ THEN DO ~ActionOverride("M#Amber",SetDialogue("m#ambern")) ~ GOTO 321 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npshld") ~ THEN GOTO 144 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun22") ~ THEN GOTO 158 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun18") ~ THEN GOTO 162 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun23") ~ THEN GOTO 166 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot02") ~ THEN GOTO 170 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot03") ~ THEN GOTO 174 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot04") ~ THEN GOTO 178 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot05") ~ THEN GOTO 182 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("bow10") ~ THEN GOTO 186 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("chan14") ~ THEN GOTO 195 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm04") ~ THEN GOTO 208 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm06") ~ THEN GOTO 212 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("leat20") ~ THEN GOTO 216 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npplat") ~ THEN GOTO 220 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("plat06") ~ THEN GOTO 236 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring06") ~ THEN GOTO 240 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring07") ~ THEN GOTO 244 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck16") ~ THEN GOTO 261 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck17") ~ THEN GOTO 265 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld25") ~ THEN GOTO 269 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld17") ~ THEN GOTO 273 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper06") ~ THEN GOTO 277 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper07") ~ THEN GOTO 281 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper08") ~ THEN GOTO 285 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("staf15") PartyHasItem("staf16") PartyHasItem("staf17") ~ THEN GOTO 289 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("staf14") ~ THEN GOTO 293 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h31") ~ THEN GOTO 297 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h51") ~ THEN GOTO 301 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h52") ~ THEN GOTO 307 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw2h14") ~ THEN GOTO 311 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npchan") ~ THEN GOTO 315 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") OR(2) PartyHasItem("m#bchide") PartyHasItem("m#wskin") ~ THEN GOTO 331 IF ~PartyHasItem("C#AJSHLD") ~ THEN GOTO 365 IF ~PartyHasItem("C#AJ0012") ~ THEN GOTO 374 IF ~PartyHasItem("SWGHOST") ~ THEN GOTO 387 IF ~PartyHasItem("G#TFARMR") IfValidForPartyDialogue("G#Tyris") !StateCheck("G#Tyris",CD_STATE_NOTVALID) !Global("G#TF.CromSeenArmour","GLOBAL",1) ~ THEN DO ~SetGlobal("G#TF.CromSeenArmour","GLOBAL",1) ~ GOTO 394 IF ~PartyHasItem("G#TFARMR") IfValidForPartyDialogue("G#Tyris") !StateCheck("G#Tyris",CD_STATE_NOTVALID) Global("G#TF.CromSeenArmour","GLOBAL",1) ~ THEN GOTO 401 IF ~PartyHasItem("RING06") ~ THEN GOTO 413 IF ~PartyHasItem("CLCK01") ~ THEN GOTO 417 IF ~PartyHasItem("D1ILLITH") ~ THEN GOTO 421 END IF ~~ THEN BEGIN 429 // from: 475.73 471.73 467.73 463.73 459.73 445.72 441.72 437.72 13.73 SAY #304816 /* ~Hmmm, this be fine craftmanship...~ */ IF ~~ THEN GOTO 430 END IF ~~ THEN BEGIN 430 // from: 429.0 SAY #304817 /* ~A sword from the forge of Taka Tobe! He be a great smith from the East. A grand sight this sword is.~ */ IF ~!PartyHasItem("MISC43") ~ THEN GOTO 431 IF ~PartyHasItem("MISC43") ~ THEN GOTO 432 END IF ~~ THEN BEGIN 431 // from: 430.0 SAY #304818 /* ~With several gold as reagent, an emerald can be melt into the sword and make it stronger.~ */ IF ~~ THEN GOTO 433 END IF ~~ THEN BEGIN 432 // from: 430.1 SAY #304819 /* ~If ye give me an emerald and 15000 gold, I can remake this blade into a powerful whirling weapon.~ */ IF ~PartyGoldLT(15000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 433 IF ~PartyGoldGT(14999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("D1CromUPG","AR0334",5) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(15000) TakePartyItemNum("SW1H30",1) DestroyItem("SW1H30") TakePartyItemNum("MISC43",1) DestroyItem("MISC43") DestroyGold(15000) ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 433 END IF ~~ THEN BEGIN 433 // from: 432.2 432.0 431.0 SAY #304806 /* ~Well, let's see what else ye got...~ */ IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#bchide") !PartyHasItem("m#wskin") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(2) PartyHasItem("sw1h40") PartyHasItem("m#jbrace") ~ THEN DO ~ActionOverride("M#Amber",SetDialogue("m#ambern")) ~ GOTO 321 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npshld") ~ THEN GOTO 144 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun22") ~ THEN GOTO 158 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun18") ~ THEN GOTO 162 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun23") ~ THEN GOTO 166 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot02") ~ THEN GOTO 170 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot03") ~ THEN GOTO 174 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot04") ~ THEN GOTO 178 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot05") ~ THEN GOTO 182 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("bow10") ~ THEN GOTO 186 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("chan14") ~ THEN GOTO 195 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm04") ~ THEN GOTO 208 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm06") ~ THEN GOTO 212 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("leat20") ~ THEN GOTO 216 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npplat") ~ THEN GOTO 220 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("plat06") ~ THEN GOTO 236 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring06") ~ THEN GOTO 240 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring07") ~ THEN GOTO 244 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck16") ~ THEN GOTO 261 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck17") ~ THEN GOTO 265 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld25") ~ THEN GOTO 269 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld17") ~ THEN GOTO 273 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper06") ~ THEN GOTO 277 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper07") ~ THEN GOTO 281 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper08") ~ THEN GOTO 285 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("staf15") PartyHasItem("staf16") PartyHasItem("staf17") ~ THEN GOTO 289 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("staf14") ~ THEN GOTO 293 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h31") ~ THEN GOTO 297 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h51") ~ THEN GOTO 301 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h52") ~ THEN GOTO 307 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw2h14") ~ THEN GOTO 311 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npchan") ~ THEN GOTO 315 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") OR(2) PartyHasItem("m#bchide") PartyHasItem("m#wskin") ~ THEN GOTO 331 IF ~PartyHasItem("C#AJSHLD") ~ THEN GOTO 365 IF ~PartyHasItem("C#AJ0012") ~ THEN GOTO 374 IF ~PartyHasItem("SWGHOST") ~ THEN GOTO 387 IF ~PartyHasItem("G#TFARMR") IfValidForPartyDialogue("G#Tyris") !StateCheck("G#Tyris",CD_STATE_NOTVALID) !Global("G#TF.CromSeenArmour","GLOBAL",1) ~ THEN DO ~SetGlobal("G#TF.CromSeenArmour","GLOBAL",1) ~ GOTO 394 IF ~PartyHasItem("G#TFARMR") IfValidForPartyDialogue("G#Tyris") !StateCheck("G#Tyris",CD_STATE_NOTVALID) Global("G#TF.CromSeenArmour","GLOBAL",1) ~ THEN GOTO 401 IF ~PartyHasItem("RING06") ~ THEN GOTO 413 IF ~PartyHasItem("CLCK01") ~ THEN GOTO 417 IF ~PartyHasItem("D1ILLITH") ~ THEN GOTO 421 IF ~PartyHasItem("SW1H26") ~ THEN GOTO 425 END IF ~~ THEN BEGIN 434 // from: 475.74 471.74 467.74 463.74 459.74 445.73 441.73 13.74 SAY #304820 /* ~Ay, what have we here? A poisonous sword?~ */ IF ~OR(2) !NumItemsPartyGT("DAGG16",1) ~ THEN GOTO 435 IF ~NumItemsPartyGT("DAGG16",1) ~ THEN GOTO 436 END IF ~~ THEN BEGIN 435 // from: 434.0 SAY #304821 /* ~With two poisoned daggers, the venom in this sword can be enhanced.~ */ IF ~~ THEN GOTO 437 END IF ~~ THEN BEGIN 436 // from: 434.1 SAY #304822 /* ~If ye have two poisoned daggers and 7500 gold, I can make this blade be twice as effective in combat.~ */ IF ~PartyGoldLT(7500) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 437 IF ~PartyGoldGT(7499) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("D1CromUPG","AR0334",6) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(7500) TakePartyItemNum("SW1H38",1) DestroyItem("SW1H38") TakePartyItemNum("DAGG16",2) DestroyItem("DAGG16") DestroyGold(7500) ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 437 END IF ~~ THEN BEGIN 437 // from: 436.2 436.0 435.0 SAY #304806 /* ~Well, let's see what else ye got...~ */ IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#bchide") !PartyHasItem("m#wskin") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(2) PartyHasItem("sw1h40") PartyHasItem("m#jbrace") ~ THEN DO ~ActionOverride("M#Amber",SetDialogue("m#ambern")) ~ GOTO 321 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npshld") ~ THEN GOTO 144 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun22") ~ THEN GOTO 158 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun18") ~ THEN GOTO 162 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun23") ~ THEN GOTO 166 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot02") ~ THEN GOTO 170 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot03") ~ THEN GOTO 174 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot04") ~ THEN GOTO 178 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot05") ~ THEN GOTO 182 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("bow10") ~ THEN GOTO 186 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("chan14") ~ THEN GOTO 195 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm04") ~ THEN GOTO 208 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm06") ~ THEN GOTO 212 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("leat20") ~ THEN GOTO 216 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npplat") ~ THEN GOTO 220 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("plat06") ~ THEN GOTO 236 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring06") ~ THEN GOTO 240 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring07") ~ THEN GOTO 244 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck16") ~ THEN GOTO 261 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck17") ~ THEN GOTO 265 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld25") ~ THEN GOTO 269 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld17") ~ THEN GOTO 273 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper06") ~ THEN GOTO 277 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper07") ~ THEN GOTO 281 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper08") ~ THEN GOTO 285 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("staf15") PartyHasItem("staf16") PartyHasItem("staf17") ~ THEN GOTO 289 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("staf14") ~ THEN GOTO 293 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h31") ~ THEN GOTO 297 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h51") ~ THEN GOTO 301 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h52") ~ THEN GOTO 307 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw2h14") ~ THEN GOTO 311 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npchan") ~ THEN GOTO 315 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") OR(2) PartyHasItem("m#bchide") PartyHasItem("m#wskin") ~ THEN GOTO 331 IF ~PartyHasItem("C#AJSHLD") ~ THEN GOTO 365 IF ~PartyHasItem("C#AJ0012") ~ THEN GOTO 374 IF ~PartyHasItem("SWGHOST") ~ THEN GOTO 387 IF ~PartyHasItem("G#TFARMR") IfValidForPartyDialogue("G#Tyris") !StateCheck("G#Tyris",CD_STATE_NOTVALID) !Global("G#TF.CromSeenArmour","GLOBAL",1) ~ THEN DO ~SetGlobal("G#TF.CromSeenArmour","GLOBAL",1) ~ GOTO 394 IF ~PartyHasItem("G#TFARMR") IfValidForPartyDialogue("G#Tyris") !StateCheck("G#Tyris",CD_STATE_NOTVALID) Global("G#TF.CromSeenArmour","GLOBAL",1) ~ THEN GOTO 401 IF ~PartyHasItem("RING06") ~ THEN GOTO 413 IF ~PartyHasItem("CLCK01") ~ THEN GOTO 417 IF ~PartyHasItem("D1ILLITH") ~ THEN GOTO 421 IF ~PartyHasItem("SW1H26") ~ THEN GOTO 425 IF ~PartyHasItem("SW1H30") ~ THEN GOTO 429 END IF ~~ THEN BEGIN 438 // from: 475.75 471.75 467.75 463.75 459.75 445.74 13.75 SAY #304823 /* ~Hmmm, what have you got there? Ah, a life-draining sword.~ */ IF ~OR(2) !NumItemsPartyGT("MISC20",1) ~ THEN GOTO 439 IF ~NumItemsPartyGT("MISC20",1) ~ THEN GOTO 440 END IF ~~ THEN BEGIN 439 // from: 438.0 SAY #304824 /* ~Two bloodstone gems can be melt into the blade in order to make its powers more potent.~ */ IF ~~ THEN GOTO 441 END IF ~~ THEN BEGIN 440 // from: 438.1 SAY #304825 /* ~If ye have two bloodstone gems and 7500 gold, I can increase the thirst of the sword twofold, giving ye more regeneration per hit.~ */ IF ~PartyGoldLT(7500) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 441 IF ~PartyGoldGT(7499) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("D1CromUPG","AR0334",7) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(7500) TakePartyItemNum("SW1H35",1) DestroyItem("SW1H35") TakePartyItemNum("MISC20",2) DestroyItem("DAGG16") DestroyGold(7500) ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 441 END IF ~~ THEN BEGIN 441 // from: 440.2 440.0 439.0 SAY #304806 /* ~Well, let's see what else ye got...~ */ IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#bchide") !PartyHasItem("m#wskin") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(2) PartyHasItem("sw1h40") PartyHasItem("m#jbrace") ~ THEN DO ~ActionOverride("M#Amber",SetDialogue("m#ambern")) ~ GOTO 321 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npshld") ~ THEN GOTO 144 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun22") ~ THEN GOTO 158 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun18") ~ THEN GOTO 162 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun23") ~ THEN GOTO 166 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot02") ~ THEN GOTO 170 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot03") ~ THEN GOTO 174 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot04") ~ THEN GOTO 178 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot05") ~ THEN GOTO 182 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("bow10") ~ THEN GOTO 186 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("chan14") ~ THEN GOTO 195 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm04") ~ THEN GOTO 208 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm06") ~ THEN GOTO 212 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("leat20") ~ THEN GOTO 216 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npplat") ~ THEN GOTO 220 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("plat06") ~ THEN GOTO 236 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring06") ~ THEN GOTO 240 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring07") ~ THEN GOTO 244 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck16") ~ THEN GOTO 261 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck17") ~ THEN GOTO 265 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld25") ~ THEN GOTO 269 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld17") ~ THEN GOTO 273 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper06") ~ THEN GOTO 277 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper07") ~ THEN GOTO 281 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper08") ~ THEN GOTO 285 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("staf15") PartyHasItem("staf16") PartyHasItem("staf17") ~ THEN GOTO 289 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("staf14") ~ THEN GOTO 293 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h31") ~ THEN GOTO 297 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h51") ~ THEN GOTO 301 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h52") ~ THEN GOTO 307 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw2h14") ~ THEN GOTO 311 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npchan") ~ THEN GOTO 315 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") OR(2) PartyHasItem("m#bchide") PartyHasItem("m#wskin") ~ THEN GOTO 331 IF ~PartyHasItem("C#AJSHLD") ~ THEN GOTO 365 IF ~PartyHasItem("C#AJ0012") ~ THEN GOTO 374 IF ~PartyHasItem("SWGHOST") ~ THEN GOTO 387 IF ~PartyHasItem("G#TFARMR") IfValidForPartyDialogue("G#Tyris") !StateCheck("G#Tyris",CD_STATE_NOTVALID) !Global("G#TF.CromSeenArmour","GLOBAL",1) ~ THEN DO ~SetGlobal("G#TF.CromSeenArmour","GLOBAL",1) ~ GOTO 394 IF ~PartyHasItem("G#TFARMR") IfValidForPartyDialogue("G#Tyris") !StateCheck("G#Tyris",CD_STATE_NOTVALID) Global("G#TF.CromSeenArmour","GLOBAL",1) ~ THEN GOTO 401 IF ~PartyHasItem("RING06") ~ THEN GOTO 413 IF ~PartyHasItem("CLCK01") ~ THEN GOTO 417 IF ~PartyHasItem("D1ILLITH") ~ THEN GOTO 421 IF ~PartyHasItem("SW1H26") ~ THEN GOTO 425 IF ~PartyHasItem("SW1H30") ~ THEN GOTO 429 IF ~PartyHasItem("SW1H38") ~ THEN GOTO 434 END IF ~~ THEN BEGIN 442 // from: 475.76 471.76 467.76 463.76 459.76 13.76 SAY #304826 /* ~I see ye have a magical amulet of protection....~ */ IF ~OR(2) !NumItemsPartyGT("MISC23",2) ~ THEN GOTO 443 IF ~NumItemsPartyGT("MISC23",2) ~ THEN GOTO 444 END IF ~~ THEN BEGIN 443 // from: 442.0 SAY #304827 /* ~With three jasper gems, this amulet can be transmuted into a periapt against poison.~ */ IF ~~ THEN GOTO 445 END IF ~~ THEN BEGIN 444 // from: 442.1 SAY #304828 /* ~If ye have three jasper gems and 5000 gold, I can make ye an amulet that'll make you forget about poisons.~ */ IF ~PartyGoldLT(5000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 445 IF ~PartyGoldGT(4999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("D1CromUPG","AR0334",8) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(5000) TakePartyItemNum("AMUL14",1) DestroyItem("AMUL14") TakePartyItemNum("MISC23",3) DestroyItem("MISC23") DestroyGold(5000) ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 445 END IF ~~ THEN BEGIN 445 // from: 444.2 444.0 443.0 SAY #304806 /* ~Well, let's see what else ye got...~ */ IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#bchide") !PartyHasItem("m#wskin") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(2) PartyHasItem("sw1h40") PartyHasItem("m#jbrace") ~ THEN DO ~ActionOverride("M#Amber",SetDialogue("m#ambern")) ~ GOTO 321 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npshld") ~ THEN GOTO 144 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun22") ~ THEN GOTO 158 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun18") ~ THEN GOTO 162 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun23") ~ THEN GOTO 166 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot02") ~ THEN GOTO 170 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot03") ~ THEN GOTO 174 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot04") ~ THEN GOTO 178 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot05") ~ THEN GOTO 182 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("bow10") ~ THEN GOTO 186 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("chan14") ~ THEN GOTO 195 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm04") ~ THEN GOTO 208 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm06") ~ THEN GOTO 212 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("leat20") ~ THEN GOTO 216 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npplat") ~ THEN GOTO 220 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("plat06") ~ THEN GOTO 236 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring06") ~ THEN GOTO 240 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring07") ~ THEN GOTO 244 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck16") ~ THEN GOTO 261 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck17") ~ THEN GOTO 265 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld25") ~ THEN GOTO 269 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld17") ~ THEN GOTO 273 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper06") ~ THEN GOTO 277 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper07") ~ THEN GOTO 281 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper08") ~ THEN GOTO 285 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("staf15") PartyHasItem("staf16") PartyHasItem("staf17") ~ THEN GOTO 289 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("staf14") ~ THEN GOTO 293 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h31") ~ THEN GOTO 297 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h51") ~ THEN GOTO 301 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h52") ~ THEN GOTO 307 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw2h14") ~ THEN GOTO 311 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npchan") ~ THEN GOTO 315 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") OR(2) PartyHasItem("m#bchide") PartyHasItem("m#wskin") ~ THEN GOTO 331 IF ~PartyHasItem("C#AJSHLD") ~ THEN GOTO 365 IF ~PartyHasItem("C#AJ0012") ~ THEN GOTO 374 IF ~PartyHasItem("SWGHOST") ~ THEN GOTO 387 IF ~PartyHasItem("G#TFARMR") IfValidForPartyDialogue("G#Tyris") !StateCheck("G#Tyris",CD_STATE_NOTVALID) !Global("G#TF.CromSeenArmour","GLOBAL",1) ~ THEN DO ~SetGlobal("G#TF.CromSeenArmour","GLOBAL",1) ~ GOTO 394 IF ~PartyHasItem("G#TFARMR") IfValidForPartyDialogue("G#Tyris") !StateCheck("G#Tyris",CD_STATE_NOTVALID) Global("G#TF.CromSeenArmour","GLOBAL",1) ~ THEN GOTO 401 IF ~PartyHasItem("RING06") ~ THEN GOTO 413 IF ~PartyHasItem("CLCK01") ~ THEN GOTO 417 IF ~PartyHasItem("D1ILLITH") ~ THEN GOTO 421 IF ~PartyHasItem("SW1H26") ~ THEN GOTO 425 IF ~PartyHasItem("SW1H30") ~ THEN GOTO 429 IF ~PartyHasItem("SW1H38") ~ THEN GOTO 434 IF ~PartyHasItem("SW1H35") ~ THEN GOTO 438 END IF ~~ THEN BEGIN 446 // from: SAY #306890 /* ~Pah! The old cracker wouldn't be able to open a nutshell with his hammer, let alone craft a decent blade. Yer probably here asking me t' fix that cursed blade he sold you.~ */ IF ~~ THEN GOTO 13 IF ~IfValidForPartyDialogue("k#Sheena") !Dead("K#Sheena") ~ THEN EXTERN ~SHEENAJ~ 284 IF ~IfValidForPartyDialogue("k#Sheena") !Dead("K#Sheena") ~ THEN GOTO 448 IF ~IfValidForPartyDialogue("k#Sheena") !Dead("K#Sheena") ~ THEN EXTERN ~SHEENAJ~ 283 IF ~IfValidForPartyDialogue("k#Sheena") !Dead("K#Sheena") ~ THEN GOTO 447 IF ~IfValidForPartyDialogue("k#Sheena") !Dead("K#Sheena") ~ THEN EXTERN ~SHEENAJ~ 282 END IF ~~ THEN BEGIN 447 // from: 446.4 SAY #306892 /* ~I remember ye. Ye had flappy wings and a big tail last time we met. Ye lost them fer better features. But yer right, be it not fer competition, I'd hav' to admit Samuel is a bloody good smithy. Beats steel faster than a sprinting dwarf.~ */ IF ~~ THEN GOTO 13 IF ~IfValidForPartyDialogue("k#Sheena") !Dead("K#Sheena") ~ THEN EXTERN ~SHEENAJ~ 284 IF ~IfValidForPartyDialogue("k#Sheena") !Dead("K#Sheena") ~ THEN GOTO 448 IF ~IfValidForPartyDialogue("k#Sheena") !Dead("K#Sheena") ~ THEN EXTERN ~SHEENAJ~ 283 END IF ~~ THEN BEGIN 448 // from: 447.2 446.2 SAY #306894 /* ~Plain to see. Twas made with his love for ye. Wouldn't touch it unless he gave me his blessing.~ */ IF ~~ THEN GOTO 13 IF ~IfValidForPartyDialogue("k#Sheena") !Dead("K#Sheena") ~ THEN EXTERN ~SHEENAJ~ 284 END IF ~~ THEN BEGIN 449 // from: 58.16 11.2 9.3 7.4 6.6 5.5 3.6 2.5 1.6 0.9 SAY #336256 /* ~Ye mean fer Big? Aye, I've got his commission somewhere hereabouts. Did ye bring the payment then?~ */ IF ~~ THEN REPLY #336257 /* ~Payment? He didn't say anything about payment!~ */ GOTO 450 IF ~~ THEN REPLY #336258 /* ~Well, I know the score. How much does he owe you?~ */ GOTO 451 END IF ~~ THEN BEGIN 450 // from: 449.0 SAY #336259 /* ~That'd be the way. Robukin'd forget his own legs if the gods had not made sure they were properly bolted on.~ */ IF ~~ THEN GOTO 452 END IF ~~ THEN BEGIN 451 // from: 449.1 SAY #336260 /* ~Not money if that's what ye're thinking.~ */ IF ~~ THEN GOTO 452 END IF ~~ THEN BEGIN 452 // from: 451.0 450.0 SAY #336261 /* ~Aye, well, he owes me a special payment, a scroll. Ye'll have to get it from him, I'll accept nothing else for the oil I made fer him. Bring me that scroll and the concoction's all yours.~ */ IF ~~ THEN GOTO 453 END IF ~~ THEN BEGIN 453 // from: 452.0 SAY #336262 /* ~Is there anything else I can help ye with?~ */ IF ~~ THEN REPLY #59693 /* ~I would like to see what you have for sale.~ */ GOTO 2 IF ~~ THEN REPLY #59694 /* ~What sort of smithing do you do?~ */ GOTO 8 IF ~~ THEN REPLY #59695 /* ~And what if I said I only want to look around?~ */ GOTO 10 IF ~~ THEN REPLY #59696 /* ~Not really. I'll be on my way.~ */ GOTO 4 END IF ~~ THEN BEGIN 454 // from: 58.17 11.3 9.4 7.5 6.7 5.6 3.7 2.6 1.7 0.10 SAY #336263 /* ~Aye, I have it here. Take it and I hope this is worth all the leg-work Robukin's put ye through.~ */ IF ~~ THEN DO ~TakeItemReplace("G3OIL","G3BRSCRL",LastTalkedToBy) DestroyItem("G3BRSCRL") ~ EXIT END IF ~~ THEN BEGIN 455 // from: 475.77 471.77 467.77 463.77 13.77 SAY #348680 /* ~Hmmm... aye, now, this looks interesting...~ */ IF ~PartyHasItem("RR#BUC01") !PartyHasItem("KEY23") ~ THEN GOTO 456 IF ~PartyHasItem("RR#BUC01") PartyHasItem("KEY23") ~ THEN GOTO 457 END IF ~~ THEN BEGIN 456 // from: 455.0 SAY #348681 /* ~That ol' battered buckler yer're holdin' was once a mighty relic that belonged to a high priest of Amaunator, if me eyes don't be deceiving me. In case ye somehow stumble upon a holy symbol of the lost sun god, I could infuse the shield with its essence and restore some of the relic's old power.~ */ IF ~~ THEN GOTO 459 END IF ~~ THEN BEGIN 457 // from: 455.1 SAY #348682 /* ~Ye have the old relic of Amaunator and the sun god's holy symbol. For 7,500 gold, I could try to fuse them together for ye.~ */ IF ~PartyGoldLT(7500) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 459 IF ~PartyGoldGT(7499) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("RR#Items","ar0334",1) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(7500) TakePartyItemNum("RR#BUC01",1) DestroyItem("RR#BUC01") TakePartyItemNum("KEY23",1) DestroyItem("KEY23") DestroyGold(7500) ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 459 END IF WEIGHT #0 ~GlobalGT("RR#Craft","ar0334",0) ~ THEN BEGIN 458 // from: SAY #59797 /* ~Well, there ye go, me friend. Use it well. And if ye comes across anything else of interest, ye knows where to bring it, aye?~ */ IF ~~ THEN DO ~SetGlobal("RR#Craft","ar0334",0) ~ EXIT END IF ~~ THEN BEGIN 459 // from: 457.2 457.0 456.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#bchide") !PartyHasItem("m#wskin") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(2) PartyHasItem("sw1h40") PartyHasItem("m#jbrace") ~ THEN DO ~ActionOverride("M#Amber",SetDialogue("m#ambern")) ~ GOTO 321 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npshld") ~ THEN GOTO 144 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun22") ~ THEN GOTO 158 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun18") ~ THEN GOTO 162 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("sdnpcsw3") ~ THEN REPLY #329138 /* ~Can you make a daikatana out of Celestial Fury?~ */ GOTO 84 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot02") ~ THEN GOTO 170 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot03") ~ THEN GOTO 174 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot04") ~ THEN GOTO 178 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot05") ~ THEN GOTO 182 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("bow10") ~ THEN GOTO 186 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("chan14") ~ THEN GOTO 195 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm04") ~ THEN GOTO 208 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm06") ~ THEN GOTO 212 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("leat20") ~ THEN GOTO 216 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npplat") ~ THEN GOTO 220 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("plat06") ~ THEN GOTO 236 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring06") ~ THEN GOTO 240 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring07") ~ THEN GOTO 244 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck16") ~ THEN GOTO 261 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck17") ~ THEN GOTO 265 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld25") ~ THEN GOTO 269 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld17") ~ THEN GOTO 273 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper06") ~ THEN GOTO 277 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper07") ~ THEN GOTO 281 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper08") ~ THEN GOTO 285 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("staf15") PartyHasItem("staf16") PartyHasItem("staf17") ~ THEN GOTO 289 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("staf14") ~ THEN GOTO 293 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h31") ~ THEN GOTO 297 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h51") ~ THEN GOTO 301 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h52") ~ THEN GOTO 307 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw2h14") ~ THEN GOTO 311 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npchan") ~ THEN GOTO 315 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") OR(2) PartyHasItem("m#bchide") PartyHasItem("m#wskin") ~ THEN GOTO 331 IF ~PartyHasItem("C#AJSHLD") ~ THEN GOTO 365 IF ~PartyHasItem("C#AJ0012") ~ THEN GOTO 374 IF ~PartyHasItem("SWGHOST") ~ THEN GOTO 387 IF ~PartyHasItem("G#TFARMR") IfValidForPartyDialogue("G#Tyris") !StateCheck("G#Tyris",CD_STATE_NOTVALID) !Global("G#TF.CromSeenArmour","GLOBAL",1) ~ THEN DO ~SetGlobal("G#TF.CromSeenArmour","GLOBAL",1) ~ GOTO 394 IF ~PartyHasItem("G#TFARMR") IfValidForPartyDialogue("G#Tyris") !StateCheck("G#Tyris",CD_STATE_NOTVALID) Global("G#TF.CromSeenArmour","GLOBAL",1) ~ THEN GOTO 401 IF ~PartyHasItem("RING06") ~ THEN GOTO 413 IF ~PartyHasItem("CLCK01") ~ THEN GOTO 417 IF ~PartyHasItem("D1ILLITH") ~ THEN GOTO 421 IF ~PartyHasItem("SW1H26") ~ THEN GOTO 425 IF ~PartyHasItem("SW1H30") ~ THEN GOTO 429 IF ~PartyHasItem("SW1H38") ~ THEN GOTO 434 IF ~PartyHasItem("SW1H35") ~ THEN GOTO 438 IF ~PartyHasItem("AMUL14") ~ THEN GOTO 442 END IF ~~ THEN BEGIN 460 // from: 475.78 471.78 467.78 13.78 SAY #348683 /* ~Hmph, I reckon something could be done with that puny dart of yers. Let me see...~ */ IF ~PartyHasItem("RR#FDART") !PartyHasItem("MISCAL") ~ THEN GOTO 461 IF ~PartyHasItem("RR#FDART") PartyHasItem("MISCAL") ~ THEN GOTO 462 END IF ~~ THEN BEGIN 461 // from: 460.0 SAY #348684 /* ~If ye ever get yer hands on some mithril, I could use it to coat the dart's tip and make it a wee bit stronger. Even a small piece will do.~ */ IF ~~ THEN GOTO 463 END IF ~~ THEN BEGIN 462 // from: 460.1 SAY #348685 /* ~Ach, ye have a mithril piece! For 5,000 gold I could use it to coat the tip of that dart ye're holdin' and make it a wee bit stronger. Well, what say ye?~ */ IF ~PartyGoldLT(5000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 463 IF ~PartyGoldGT(4999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("RR#Items","ar0334",2) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(5000) TakePartyItemNum("RR#FDART",1) DestroyItem("RR#FDART") TakePartyItemNum("MISCAL",1) DestroyItem("MISCAL") DestroyGold(5000) ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 463 END IF ~~ THEN BEGIN 463 // from: 462.2 462.0 461.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#bchide") !PartyHasItem("m#wskin") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(2) PartyHasItem("sw1h40") PartyHasItem("m#jbrace") ~ THEN DO ~ActionOverride("M#Amber",SetDialogue("m#ambern")) ~ GOTO 321 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npshld") ~ THEN GOTO 144 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun22") ~ THEN GOTO 158 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun18") ~ THEN GOTO 162 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("sdnpcsw3") ~ THEN REPLY #329138 /* ~Can you make a daikatana out of Celestial Fury?~ */ GOTO 84 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot02") ~ THEN GOTO 170 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot03") ~ THEN GOTO 174 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot04") ~ THEN GOTO 178 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot05") ~ THEN GOTO 182 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("bow10") ~ THEN GOTO 186 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("chan14") ~ THEN GOTO 195 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm04") ~ THEN GOTO 208 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm06") ~ THEN GOTO 212 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("leat20") ~ THEN GOTO 216 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npplat") ~ THEN GOTO 220 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("plat06") ~ THEN GOTO 236 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring06") ~ THEN GOTO 240 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring07") ~ THEN GOTO 244 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck16") ~ THEN GOTO 261 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck17") ~ THEN GOTO 265 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld25") ~ THEN GOTO 269 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld17") ~ THEN GOTO 273 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper06") ~ THEN GOTO 277 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper07") ~ THEN GOTO 281 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper08") ~ THEN GOTO 285 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("staf15") PartyHasItem("staf16") PartyHasItem("staf17") ~ THEN GOTO 289 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("staf14") ~ THEN GOTO 293 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h31") ~ THEN GOTO 297 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h51") ~ THEN GOTO 301 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h52") ~ THEN GOTO 307 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw2h14") ~ THEN GOTO 311 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npchan") ~ THEN GOTO 315 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") OR(2) PartyHasItem("m#bchide") PartyHasItem("m#wskin") ~ THEN GOTO 331 IF ~PartyHasItem("C#AJSHLD") ~ THEN GOTO 365 IF ~PartyHasItem("C#AJ0012") ~ THEN GOTO 374 IF ~PartyHasItem("SWGHOST") ~ THEN GOTO 387 IF ~PartyHasItem("G#TFARMR") IfValidForPartyDialogue("G#Tyris") !StateCheck("G#Tyris",CD_STATE_NOTVALID) !Global("G#TF.CromSeenArmour","GLOBAL",1) ~ THEN DO ~SetGlobal("G#TF.CromSeenArmour","GLOBAL",1) ~ GOTO 394 IF ~PartyHasItem("G#TFARMR") IfValidForPartyDialogue("G#Tyris") !StateCheck("G#Tyris",CD_STATE_NOTVALID) Global("G#TF.CromSeenArmour","GLOBAL",1) ~ THEN GOTO 401 IF ~PartyHasItem("RING06") ~ THEN GOTO 413 IF ~PartyHasItem("CLCK01") ~ THEN GOTO 417 IF ~PartyHasItem("D1ILLITH") ~ THEN GOTO 421 IF ~PartyHasItem("SW1H26") ~ THEN GOTO 425 IF ~PartyHasItem("SW1H30") ~ THEN GOTO 429 IF ~PartyHasItem("SW1H38") ~ THEN GOTO 434 IF ~PartyHasItem("SW1H35") ~ THEN GOTO 438 IF ~PartyHasItem("AMUL14") ~ THEN GOTO 442 IF ~PartyHasItem("RR#BUC01") ~ THEN GOTO 455 END IF ~~ THEN BEGIN 464 // from: 475.79 471.79 13.79 SAY #348686 /* ~Ye've a fancy sword there , Kara-Tur craftmanship aye? Let me take a look...~ */ IF ~PartyHasItem("RR#KEEP") !PartyHasItem("MISC9Y") ~ THEN GOTO 465 IF ~PartyHasItem("RR#KEEP") PartyHasItem("MISC9Y") ~ THEN GOTO 466 END IF ~~ THEN BEGIN 465 // from: 464.0 SAY #348687 /* ~Hmm... the craft be truly flawless, I cannae do much 'bout that. Still, I could strengthen the anti-chaos enchantments on the blade if ye ever get ahold of some Illithid brine water.~ */ IF ~~ THEN GOTO 467 END IF ~~ THEN BEGIN 466 // from: 464.1 SAY #348688 /* ~Ay, now... ye found some Illithid brine water didn't ye? Well, for 5,000 gold I could use it to strengthen the anti-chaos enchantments on that fancy Kara-Tur blade of yers. Are ye interested?~ */ IF ~PartyGoldLT(5000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 467 IF ~PartyGoldGT(4999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("RR#Items","ar0334",3) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(5000) TakePartyItemNum("RR#KEEP",1) DestroyItem("RR#KEEP") TakePartyItemNum("MISC9Y",1) DestroyItem("MISC9Y") DestroyGold(5000) ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 467 END IF ~~ THEN BEGIN 467 // from: 466.2 466.0 465.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#bchide") !PartyHasItem("m#wskin") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(2) PartyHasItem("sw1h40") PartyHasItem("m#jbrace") ~ THEN DO ~ActionOverride("M#Amber",SetDialogue("m#ambern")) ~ GOTO 321 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npshld") ~ THEN GOTO 144 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun22") ~ THEN GOTO 158 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun18") ~ THEN GOTO 162 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("sdnpcsw3") ~ THEN REPLY #329138 /* ~Can you make a daikatana out of Celestial Fury?~ */ GOTO 84 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot02") ~ THEN GOTO 170 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot03") ~ THEN GOTO 174 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot04") ~ THEN GOTO 178 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot05") ~ THEN GOTO 182 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("bow10") ~ THEN GOTO 186 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("chan14") ~ THEN GOTO 195 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm04") ~ THEN GOTO 208 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm06") ~ THEN GOTO 212 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("leat20") ~ THEN GOTO 216 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npplat") ~ THEN GOTO 220 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("plat06") ~ THEN GOTO 236 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring06") ~ THEN GOTO 240 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring07") ~ THEN GOTO 244 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck16") ~ THEN GOTO 261 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck17") ~ THEN GOTO 265 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld25") ~ THEN GOTO 269 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld17") ~ THEN GOTO 273 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper06") ~ THEN GOTO 277 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper07") ~ THEN GOTO 281 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper08") ~ THEN GOTO 285 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("staf15") PartyHasItem("staf16") PartyHasItem("staf17") ~ THEN GOTO 289 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("staf14") ~ THEN GOTO 293 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h31") ~ THEN GOTO 297 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h51") ~ THEN GOTO 301 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h52") ~ THEN GOTO 307 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw2h14") ~ THEN GOTO 311 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npchan") ~ THEN GOTO 315 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") OR(2) PartyHasItem("m#bchide") PartyHasItem("m#wskin") ~ THEN GOTO 331 IF ~PartyHasItem("C#AJSHLD") ~ THEN GOTO 365 IF ~PartyHasItem("C#AJ0012") ~ THEN GOTO 374 IF ~PartyHasItem("SWGHOST") ~ THEN GOTO 387 IF ~PartyHasItem("G#TFARMR") IfValidForPartyDialogue("G#Tyris") !StateCheck("G#Tyris",CD_STATE_NOTVALID) !Global("G#TF.CromSeenArmour","GLOBAL",1) ~ THEN DO ~SetGlobal("G#TF.CromSeenArmour","GLOBAL",1) ~ GOTO 394 IF ~PartyHasItem("G#TFARMR") IfValidForPartyDialogue("G#Tyris") !StateCheck("G#Tyris",CD_STATE_NOTVALID) Global("G#TF.CromSeenArmour","GLOBAL",1) ~ THEN GOTO 401 IF ~PartyHasItem("RING06") ~ THEN GOTO 413 IF ~PartyHasItem("CLCK01") ~ THEN GOTO 417 IF ~PartyHasItem("D1ILLITH") ~ THEN GOTO 421 IF ~PartyHasItem("SW1H26") ~ THEN GOTO 425 IF ~PartyHasItem("SW1H30") ~ THEN GOTO 429 IF ~PartyHasItem("SW1H38") ~ THEN GOTO 434 IF ~PartyHasItem("SW1H35") ~ THEN GOTO 438 IF ~PartyHasItem("AMUL14") ~ THEN GOTO 442 IF ~PartyHasItem("RR#BUC01") ~ THEN GOTO 455 IF ~PartyHasItem("RR#FDART") ~ THEN GOTO 460 END IF ~~ THEN BEGIN 468 // from: 475.80 13.80 SAY #348689 /* ~Eh, what have ye got there? A club of some sort? Let's see...~ */ IF ~PartyHasItem("RR#WEAR") !PartyHasItem("MISC6Z") ~ THEN GOTO 469 IF ~PartyHasItem("RR#WEAR") PartyHasItem("MISC6Z") ~ THEN GOTO 470 END IF ~~ THEN BEGIN 469 // from: 468.0 SAY #348690 /* ~Uthgardt craftsmanship? Aye, though it looks unfinished. Hmm... if ye can get me a Beljuril gem, I might be able to do something about that.~ */ IF ~~ THEN GOTO 471 END IF ~~ THEN BEGIN 470 // from: 468.1 SAY #348691 /* ~Ye've found a Beljuril gem, aye? For 5,000 gold I could use it to finish the enchantments on that club of yers. What say ye ?~ */ IF ~PartyGoldLT(5000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 471 IF ~PartyGoldGT(4999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("RR#Items","ar0334",4) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(5000) TakePartyItemNum("RR#WEAR",1) DestroyItem("RR#WEAR") TakePartyItemNum("MISC6Z",1) DestroyItem("MISC6Z") DestroyGold(5000) ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 471 END IF ~~ THEN BEGIN 471 // from: 470.2 470.0 469.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#bchide") !PartyHasItem("m#wskin") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(2) PartyHasItem("sw1h40") PartyHasItem("m#jbrace") ~ THEN DO ~ActionOverride("M#Amber",SetDialogue("m#ambern")) ~ GOTO 321 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npshld") ~ THEN GOTO 144 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun22") ~ THEN GOTO 158 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun18") ~ THEN GOTO 162 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("sdnpcsw3") ~ THEN REPLY #329138 /* ~Can you make a daikatana out of Celestial Fury?~ */ GOTO 84 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot02") ~ THEN GOTO 170 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot03") ~ THEN GOTO 174 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot04") ~ THEN GOTO 178 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot05") ~ THEN GOTO 182 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("bow10") ~ THEN GOTO 186 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("chan14") ~ THEN GOTO 195 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm04") ~ THEN GOTO 208 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm06") ~ THEN GOTO 212 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("leat20") ~ THEN GOTO 216 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npplat") ~ THEN GOTO 220 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("plat06") ~ THEN GOTO 236 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring06") ~ THEN GOTO 240 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring07") ~ THEN GOTO 244 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck16") ~ THEN GOTO 261 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck17") ~ THEN GOTO 265 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld25") ~ THEN GOTO 269 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld17") ~ THEN GOTO 273 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper06") ~ THEN GOTO 277 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper07") ~ THEN GOTO 281 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper08") ~ THEN GOTO 285 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("staf15") PartyHasItem("staf16") PartyHasItem("staf17") ~ THEN GOTO 289 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("staf14") ~ THEN GOTO 293 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h31") ~ THEN GOTO 297 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h51") ~ THEN GOTO 301 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h52") ~ THEN GOTO 307 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw2h14") ~ THEN GOTO 311 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npchan") ~ THEN GOTO 315 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") OR(2) PartyHasItem("m#bchide") PartyHasItem("m#wskin") ~ THEN GOTO 331 IF ~PartyHasItem("C#AJSHLD") ~ THEN GOTO 365 IF ~PartyHasItem("C#AJ0012") ~ THEN GOTO 374 IF ~PartyHasItem("SWGHOST") ~ THEN GOTO 387 IF ~PartyHasItem("G#TFARMR") IfValidForPartyDialogue("G#Tyris") !StateCheck("G#Tyris",CD_STATE_NOTVALID) !Global("G#TF.CromSeenArmour","GLOBAL",1) ~ THEN DO ~SetGlobal("G#TF.CromSeenArmour","GLOBAL",1) ~ GOTO 394 IF ~PartyHasItem("G#TFARMR") IfValidForPartyDialogue("G#Tyris") !StateCheck("G#Tyris",CD_STATE_NOTVALID) Global("G#TF.CromSeenArmour","GLOBAL",1) ~ THEN GOTO 401 IF ~PartyHasItem("RING06") ~ THEN GOTO 413 IF ~PartyHasItem("CLCK01") ~ THEN GOTO 417 IF ~PartyHasItem("D1ILLITH") ~ THEN GOTO 421 IF ~PartyHasItem("SW1H26") ~ THEN GOTO 425 IF ~PartyHasItem("SW1H30") ~ THEN GOTO 429 IF ~PartyHasItem("SW1H38") ~ THEN GOTO 434 IF ~PartyHasItem("SW1H35") ~ THEN GOTO 438 IF ~PartyHasItem("AMUL14") ~ THEN GOTO 442 IF ~PartyHasItem("RR#BUC01") ~ THEN GOTO 455 IF ~PartyHasItem("RR#FDART") ~ THEN GOTO 460 IF ~PartyHasItem("RR#KEEP") ~ THEN GOTO 464 END IF ~~ THEN BEGIN 472 // from: 13.81 SAY #348692 /* ~That's a fairly sturdy buckler ye got there. Made of darksteel eh? Let me see that up close...~ */ IF ~PartyHasItem("RR#RWARD") OR(2) !PartyHasItem("DWDUST") !PartyHasItem("MISC45") ~ THEN GOTO 473 IF ~PartyHasItem("RR#RWARD") PartyHasItem("DWDUST") PartyHasItem("MISC45") ~ THEN GOTO 474 END IF ~~ THEN BEGIN 473 // from: 472.0 SAY #348693 /* ~Oy, if ye can get me a Rogue Stone and some adamantine dust, I could strengthen the darksteel alloy a bit.~ */ IF ~~ THEN GOTO 475 END IF ~~ THEN BEGIN 474 // from: 472.1 SAY #348694 /* ~Ye have a Rogue Stone and some adamantine dust! For 5,000 gold I could use that to strengthen yer darksteel buckler. I reckon ye're interested?~ */ IF ~PartyGoldLT(5000) ~ THEN REPLY #66662 /* ~I don't have that much gold.~ */ GOTO 475 IF ~PartyGoldGT(4999) ~ THEN REPLY #66664 /* ~Sure, do it.~ */ DO ~SetGlobal("RR#Items","ar0334",5) SetGlobal("ForgeStuff","GLOBAL",1) TakePartyGold(5000) TakePartyItemNum("RR#RWARD",1) DestroyItem("RR#RWARD") TakePartyItemNum("DWDUST",1) DestroyItem("DWDUST") TakePartyItemNum("MISC45",1) DestroyItem("MISC45") DestroyGold(5000) ~ GOTO 56 IF ~~ THEN REPLY #66770 /* ~No. What else?~ */ GOTO 475 END IF ~~ THEN BEGIN 475 // from: 474.2 474.0 473.0 SAY #187621 /* ~Well, let's see what else ye got.~ */ IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#bchide") !PartyHasItem("m#wskin") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") !PartyHasItem("CBNRTHM1") !PartyHasItem("CBNRTHM2") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") ~ THEN GOTO 14 IF ~OR(2) PartyHasItem("sw1h40") PartyHasItem("m#jbrace") ~ THEN DO ~ActionOverride("M#Amber",SetDialogue("m#ambern")) ~ GOTO 321 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("scaleb") PartyHasItem("scaler") PartyHasItem("misc12") ~ THEN GOTO 15 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") OR(2) PartyHasItem("scrlag") PartyHasItem("hamm07") ~ THEN GOTO 20 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") OR(3) PartyHasItem("sw1h54a") PartyHasItem("sw1h54b") PartyHasItem("sw1h54c") ~ THEN GOTO 28 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") OR(2) PartyHasItem("bow19a") PartyHasItem("bow19b") ~ THEN GOTO 34 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") OR(2) PartyHasItem("halb09a") PartyHasItem("halb09b") ~ THEN GOTO 39 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") OR(2) PartyHasItem("misc8u") PartyHasItem("sw2h15a") ~ THEN GOTO 44 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") PartyHasItem("misc5k") ~ THEN GOTO 49 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBBDSCLE") ~ THEN GOTO 59 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("CBEMHILT") !PartyHasItem("CBEMMETL") ~ THEN GOTO 75 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") PartyHasItem("CBEMHILT") PartyHasItem("CBEMMETL") ~ THEN GOTO 80 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") PartyHasItem("CBSSHILT") ~ THEN GOTO 94 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") OR(2) PartyHasItem("CBDRSTF1") PartyHasItem("CBDRSwod") ~ THEN GOTO 102 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") OR(2) PartyHasItem("CBRNGax1") PartyHasItem("CBRNGmtl") ~ THEN GOTO 109 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("CBBDSCLE") !PartyHasItem("CBEMHILT") !PartyHasItem("CBSSHILT") !PartyHasItem("CBDRSTF1") !PartyHasItem("CBDRSwod") !PartyHasItem("CBRNGax1") !PartyHasItem("CBRNGmtl") OR(2) PartyHasItem("CBNRTHM1") PartyHasItem("CBNRTHM2") ~ THEN GOTO 116 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #24054 /* ~Then do so.~ */ GOTO 138 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("SGMISC4") PartyHasItem("SGMISC5") PartyHasItem("SGMISC6") ~ THEN GOTO 127 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") ~ THEN REPLY #992 /* ~There is nothing I want here. Goodbye.~ */ EXIT IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("amul22") PartyHasItem("amul24") PartyHasItem("amul25") PartyHasItem("amul14") ~ THEN GOTO 139 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npshld") ~ THEN GOTO 144 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ax1h10") ~ THEN GOTO 148 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("belt03") PartyHasItem("belt02") PartyHasItem("belt04") ~ THEN GOTO 152 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun22") ~ THEN GOTO 158 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun18") ~ THEN GOTO 162 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("blun23") ~ THEN GOTO 166 IF ~PartyHasItem("sdnpcsw3") ~ THEN REPLY #329138 /* ~Can you make a daikatana out of Celestial Fury?~ */ GOTO 84 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot02") ~ THEN GOTO 170 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot03") ~ THEN GOTO 174 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot04") ~ THEN GOTO 178 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("boot05") ~ THEN GOTO 182 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("bow10") ~ THEN GOTO 186 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(4) PartyHasItem("brac17") PartyHasItem("brac14") PartyHasItem("ring35") PartyHasItem("ring36") ~ THEN GOTO 191 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("chan14") ~ THEN GOTO 195 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("dagg14") PartyHasItem("dagg13") ~ THEN GOTO 199 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw05") PartyHasItem("npsw06") ~ THEN GOTO 203 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm04") ~ THEN GOTO 208 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("helm06") ~ THEN GOTO 212 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("leat20") ~ THEN GOTO 216 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npplat") ~ THEN GOTO 220 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw03") ~ THEN GOTO 224 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("misc3e") ~ THEN GOTO 228 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npsw01") ~ THEN GOTO 232 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("plat06") ~ THEN GOTO 236 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring06") ~ THEN GOTO 240 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("ring07") ~ THEN GOTO 244 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("ring27") PartyHasItem("ring28") PartyHasItem("ring29") ~ THEN GOTO 248 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("ring08") PartyHasItem("ring40") PartyHasItem("ring06") ~ THEN GOTO 252 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(2) PartyHasItem("clck15") PartyHasItem("clck19") ~ THEN GOTO 256 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck16") ~ THEN GOTO 261 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("clck17") ~ THEN GOTO 265 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld25") ~ THEN GOTO 269 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("shld17") ~ THEN GOTO 273 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper06") ~ THEN GOTO 277 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper07") ~ THEN GOTO 281 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sper08") ~ THEN GOTO 285 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") OR(3) PartyHasItem("staf15") PartyHasItem("staf16") PartyHasItem("staf17") ~ THEN GOTO 289 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("staf14") ~ THEN GOTO 293 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h31") ~ THEN GOTO 297 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h51") ~ THEN GOTO 301 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw1h52") ~ THEN GOTO 307 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("sw2h14") ~ THEN GOTO 311 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") PartyHasItem("npchan") ~ THEN GOTO 315 IF ~!PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("m#jbrace") !PartyHasItem("sw1h40") !PartyHasItem("scaleb") !PartyHasItem("scaler") !PartyHasItem("misc12") !PartyHasItem("scrlag") !PartyHasItem("hamm07") !PartyHasItem("sw1h54a") !PartyHasItem("sw1h54b") !PartyHasItem("sw1h54c") !PartyHasItem("bow19a") !PartyHasItem("bow19b") !PartyHasItem("halb09a") !PartyHasItem("halb09b") !PartyHasItem("misc8u") !PartyHasItem("sw2h15a") !PartyHasItem("misc5k") OR(2) PartyHasItem("m#bchide") PartyHasItem("m#wskin") ~ THEN GOTO 331 IF ~PartyHasItem("C#AJSHLD") ~ THEN GOTO 365 IF ~PartyHasItem("C#AJ0012") ~ THEN GOTO 374 IF ~PartyHasItem("SWGHOST") ~ THEN GOTO 387 IF ~PartyHasItem("G#TFARMR") IfValidForPartyDialogue("G#Tyris") !StateCheck("G#Tyris",CD_STATE_NOTVALID) !Global("G#TF.CromSeenArmour","GLOBAL",1) ~ THEN DO ~SetGlobal("G#TF.CromSeenArmour","GLOBAL",1) ~ GOTO 394 IF ~PartyHasItem("G#TFARMR") IfValidForPartyDialogue("G#Tyris") !StateCheck("G#Tyris",CD_STATE_NOTVALID) Global("G#TF.CromSeenArmour","GLOBAL",1) ~ THEN GOTO 401 IF ~PartyHasItem("RING06") ~ THEN GOTO 413 IF ~PartyHasItem("CLCK01") ~ THEN GOTO 417 IF ~PartyHasItem("D1ILLITH") ~ THEN GOTO 421 IF ~PartyHasItem("SW1H26") ~ THEN GOTO 425 IF ~PartyHasItem("SW1H30") ~ THEN GOTO 429 IF ~PartyHasItem("SW1H38") ~ THEN GOTO 434 IF ~PartyHasItem("SW1H35") ~ THEN GOTO 438 IF ~PartyHasItem("AMUL14") ~ THEN GOTO 442 IF ~PartyHasItem("RR#BUC01") ~ THEN GOTO 455 IF ~PartyHasItem("RR#FDART") ~ THEN GOTO 460 IF ~PartyHasItem("RR#KEEP") ~ THEN GOTO 464 IF ~PartyHasItem("RR#WEAR") ~ THEN GOTO 468 END