BEGIN ~tb#lotr~

//initializing tokens
IF ~~ initialize_tokens
SAY @0
IF ~~ THEN EXIT END

IF ~AreaCheck("bi0001") NumTimesTalkedTo(0)~ lordofmurder
SAY @1
= @2
= @3
= @4
++ @5 + bhaal
++ @6 + huh
++ @7 + adieux
++ @8 + help
END

IF ~~ huh
SAY @9
++ @5 + bhaal
++ @7 + adieux
++ @10 + help
END

IF ~~ bhaal
SAY @11
++ @12 + not_attack
++ @13 + help
END

IF ~~ not_attack
SAY @14
IF ~~ THEN GOTO adieux
END

IF ~~ adieux
SAY @15
IF ~Global("tb#lotrkilled","global",0)~ THEN DO ~GiveGoldForce(000)~ GOTO take
IF ~Global("tb#lotrkilled","global",1)~ THEN DO ~GiveGoldForce(100)~ GOTO take
IF ~Global("tb#lotrkilled","global",2)~ THEN DO ~GiveGoldForce(200)~ GOTO take
IF ~Global("tb#lotrkilled","global",3)~ THEN DO ~GiveGoldForce(300)~ GOTO take
IF ~Global("tb#lotrkilled","global",4)~ THEN DO ~GiveGoldForce(400)~ GOTO take
IF ~Global("tb#lotrkilled","global",5)~ THEN DO ~GiveGoldForce(500)~ GOTO take
IF ~Global("tb#lotrkilled","global",6)~ THEN DO ~GiveGoldForce(600)~ GOTO take
IF ~Global("tb#lotrkilled","global",7)~ THEN DO ~GiveGoldForce(700)~ GOTO take
IF ~Global("tb#lotrkilled","global",8)~ THEN DO ~GiveGoldForce(800)~ GOTO take
IF ~Global("tb#lotrkilled","global",9)~ THEN DO ~GiveGoldForce(900)~ GOTO take
IF ~Global("tb#lotrkilled","global",10)~ THEN DO ~GiveGoldForce(1000)~ GOTO take
IF ~Global("tb#lotrkilled","global",11)~ THEN DO ~GiveGoldForce(1100)~ GOTO take
IF ~Global("tb#lotrkilled","global",12)~ THEN DO ~GiveGoldForce(1200)~ GOTO take
IF ~Global("tb#lotrkilled","global",13)~ THEN DO ~GiveGoldForce(1300)~ GOTO take
IF ~Global("tb#lotrkilled","global",14)~ THEN DO ~GiveGoldForce(1400)~ GOTO take
IF ~Global("tb#lotrkilled","global",15)~ THEN DO ~GiveGoldForce(1500)~ GOTO take
IF ~Global("tb#lotrkilled","global",16)~ THEN DO ~GiveGoldForce(1600)~ GOTO take
IF ~Global("tb#lotrkilled","global",17)~ THEN DO ~GiveGoldForce(1700)~ GOTO take
IF ~Global("tb#lotrkilled","global",18)~ THEN DO ~GiveGoldForce(1800)~ GOTO take
IF ~Global("tb#lotrkilled","global",19)~ THEN DO ~GiveGoldForce(1900)~ GOTO take
IF ~Global("tb#lotrkilled","global",20)~ THEN DO ~GiveGoldForce(2000)~ GOTO take
IF ~Global("tb#lotrkilled","global",21)~ THEN DO ~GiveGoldForce(2100)~ GOTO take
IF ~Global("tb#lotrkilled","global",22)~ THEN DO ~GiveGoldForce(2200)~ GOTO take
IF ~Global("tb#lotrkilled","global",23)~ THEN DO ~GiveGoldForce(2300)~ GOTO take
IF ~Global("tb#lotrkilled","global",24)~ THEN DO ~GiveGoldForce(2400)~ GOTO take
IF ~Global("tb#lotrkilled","global",25)~ THEN DO ~GiveGoldForce(2500)~ GOTO take
IF ~Global("tb#lotrkilled","global",26)~ THEN DO ~GiveGoldForce(2600)~ GOTO take
IF ~Global("tb#lotrkilled","global",27)~ THEN DO ~GiveGoldForce(2700)~ GOTO take
IF ~Global("tb#lotrkilled","global",28)~ THEN DO ~GiveGoldForce(2800)~ GOTO take
IF ~Global("tb#lotrkilled","global",29)~ THEN DO ~GiveGoldForce(2900)~ GOTO take
IF ~Global("tb#lotrkilled","global",30)~ THEN DO ~GiveGoldForce(3000)~ GOTO take
IF ~Global("tb#lotrkilled","global",31)~ THEN DO ~GiveGoldForce(3100)~ GOTO take
IF ~Global("tb#lotrkilled","global",32)~ THEN DO ~GiveGoldForce(3200)~ GOTO take
IF ~Global("tb#lotrkilled","global",33)~ THEN DO ~GiveGoldForce(3300)~ GOTO take
IF ~Global("tb#lotrkilled","global",34)~ THEN DO ~GiveGoldForce(3400)~ GOTO take
IF ~Global("tb#lotrkilled","global",35)~ THEN DO ~GiveGoldForce(3500)~ GOTO take
IF ~Global("tb#lotrkilled","global",36)~ THEN DO ~GiveGoldForce(3600)~ GOTO take
IF ~Global("tb#lotrkilled","global",37)~ THEN DO ~GiveGoldForce(3700)~ GOTO take
IF ~Global("tb#lotrkilled","global",38)~ THEN DO ~GiveGoldForce(3800)~ GOTO take
IF ~Global("tb#lotrkilled","global",39)~ THEN DO ~GiveGoldForce(3900)~ GOTO take
IF ~Global("tb#lotrkilled","global",40)~ THEN DO ~GiveGoldForce(4000)~ GOTO take
IF ~Global("tb#lotrkilled","global",41)~ THEN DO ~GiveGoldForce(4100)~ GOTO take
IF ~Global("tb#lotrkilled","global",42)~ THEN DO ~GiveGoldForce(4200)~ GOTO take
IF ~Global("tb#lotrkilled","global",43)~ THEN DO ~GiveGoldForce(4300)~ GOTO take
IF ~Global("tb#lotrkilled","global",44)~ THEN DO ~GiveGoldForce(4400)~ GOTO take
IF ~Global("tb#lotrkilled","global",45)~ THEN DO ~GiveGoldForce(4500)~ GOTO take
IF ~Global("tb#lotrkilled","global",46)~ THEN DO ~GiveGoldForce(4600)~ GOTO take
IF ~Global("tb#lotrkilled","global",47)~ THEN DO ~GiveGoldForce(4700)~ GOTO take
IF ~Global("tb#lotrkilled","global",48)~ THEN DO ~GiveGoldForce(4800)~ GOTO take
IF ~Global("tb#lotrkilled","global",49)~ THEN DO ~GiveGoldForce(4900)~ GOTO take
IF ~Global("tb#lotrkilled","global",50)~ THEN DO ~GiveGoldForce(5000)~ GOTO take
IF ~Global("tb#lotrkilled","global",51)~ THEN DO ~GiveGoldForce(5100)~ GOTO take
IF ~Global("tb#lotrkilled","global",52)~ THEN DO ~GiveGoldForce(5200)~ GOTO take
IF ~Global("tb#lotrkilled","global",53)~ THEN DO ~GiveGoldForce(5300)~ GOTO take
IF ~Global("tb#lotrkilled","global",54)~ THEN DO ~GiveGoldForce(5400)~ GOTO take
IF ~Global("tb#lotrkilled","global",55)~ THEN DO ~GiveGoldForce(5500)~ GOTO take
IF ~Global("tb#lotrkilled","global",56)~ THEN DO ~GiveGoldForce(5600)~ GOTO take
IF ~Global("tb#lotrkilled","global",57)~ THEN DO ~GiveGoldForce(5700)~ GOTO take
IF ~Global("tb#lotrkilled","global",58)~ THEN DO ~GiveGoldForce(5800)~ GOTO take
IF ~Global("tb#lotrkilled","global",59)~ THEN DO ~GiveGoldForce(5900)~ GOTO take
IF ~Global("tb#lotrkilled","global",60)~ THEN DO ~GiveGoldForce(6000)~ GOTO take
IF ~Global("tb#lotrkilled","global",61)~ THEN DO ~GiveGoldForce(6100)~ GOTO take
IF ~Global("tb#lotrkilled","global",62)~ THEN DO ~GiveGoldForce(6200)~ GOTO take
IF ~Global("tb#lotrkilled","global",63)~ THEN DO ~GiveGoldForce(6300)~ GOTO take
IF ~Global("tb#lotrkilled","global",64)~ THEN DO ~GiveGoldForce(6400)~ GOTO take
IF ~Global("tb#lotrkilled","global",65)~ THEN DO ~GiveGoldForce(6500)~ GOTO take
IF ~Global("tb#lotrkilled","global",66)~ THEN DO ~GiveGoldForce(6600)~ GOTO take
IF ~Global("tb#lotrkilled","global",67)~ THEN DO ~GiveGoldForce(6700)~ GOTO take
IF ~Global("tb#lotrkilled","global",68)~ THEN DO ~GiveGoldForce(6800)~ GOTO take
IF ~Global("tb#lotrkilled","global",69)~ THEN DO ~GiveGoldForce(6900)~ GOTO take
IF ~Global("tb#lotrkilled","global",70)~ THEN DO ~GiveGoldForce(7000)~ GOTO take
IF ~Global("tb#lotrkilled","global",71)~ THEN DO ~GiveGoldForce(7100)~ GOTO take
IF ~Global("tb#lotrkilled","global",72)~ THEN DO ~GiveGoldForce(7200)~ GOTO take
IF ~Global("tb#lotrkilled","global",73)~ THEN DO ~GiveGoldForce(7300)~ GOTO take
IF ~Global("tb#lotrkilled","global",74)~ THEN DO ~GiveGoldForce(7400)~ GOTO take
IF ~Global("tb#lotrkilled","global",75)~ THEN DO ~GiveGoldForce(7500)~ GOTO take
IF ~Global("tb#lotrkilled","global",76)~ THEN DO ~GiveGoldForce(7600)~ GOTO take
IF ~Global("tb#lotrkilled","global",77)~ THEN DO ~GiveGoldForce(7700)~ GOTO take
IF ~Global("tb#lotrkilled","global",78)~ THEN DO ~GiveGoldForce(7800)~ GOTO take
IF ~Global("tb#lotrkilled","global",79)~ THEN DO ~GiveGoldForce(7900)~ GOTO take
IF ~Global("tb#lotrkilled","global",80)~ THEN DO ~GiveGoldForce(8000)~ GOTO take
IF ~Global("tb#lotrkilled","global",81)~ THEN DO ~GiveGoldForce(8100)~ GOTO take
IF ~Global("tb#lotrkilled","global",82)~ THEN DO ~GiveGoldForce(8200)~ GOTO take
IF ~Global("tb#lotrkilled","global",83)~ THEN DO ~GiveGoldForce(8300)~ GOTO take
IF ~Global("tb#lotrkilled","global",84)~ THEN DO ~GiveGoldForce(8400)~ GOTO take
IF ~Global("tb#lotrkilled","global",85)~ THEN DO ~GiveGoldForce(8500)~ GOTO take
IF ~Global("tb#lotrkilled","global",86)~ THEN DO ~GiveGoldForce(8600)~ GOTO take
IF ~Global("tb#lotrkilled","global",87)~ THEN DO ~GiveGoldForce(8700)~ GOTO take
IF ~Global("tb#lotrkilled","global",88)~ THEN DO ~GiveGoldForce(8800)~ GOTO take
IF ~Global("tb#lotrkilled","global",89)~ THEN DO ~GiveGoldForce(8900)~ GOTO take
IF ~Global("tb#lotrkilled","global",90)~ THEN DO ~GiveGoldForce(9000)~ GOTO take
IF ~Global("tb#lotrkilled","global",91)~ THEN DO ~GiveGoldForce(9100)~ GOTO take
IF ~Global("tb#lotrkilled","global",92)~ THEN DO ~GiveGoldForce(9200)~ GOTO take
IF ~Global("tb#lotrkilled","global",93)~ THEN DO ~GiveGoldForce(9300)~ GOTO take
IF ~Global("tb#lotrkilled","global",94)~ THEN DO ~GiveGoldForce(9400)~ GOTO take
IF ~Global("tb#lotrkilled","global",95)~ THEN DO ~GiveGoldForce(9500)~ GOTO take
IF ~Global("tb#lotrkilled","global",96)~ THEN DO ~GiveGoldForce(9600)~ GOTO take
IF ~Global("tb#lotrkilled","global",97)~ THEN DO ~GiveGoldForce(9700)~ GOTO take
IF ~Global("tb#lotrkilled","global",98)~ THEN DO ~GiveGoldForce(9800)~ GOTO take
IF ~Global("tb#lotrkilled","global",99)~ THEN DO ~GiveGoldForce(9900)~ GOTO take
IF ~Global("tb#lotrkilled","global",100)~ THEN DO ~GiveGoldForce(10000)~ GOTO take
IF ~GlobalGT("tb#lotrkilled","global",100)~ THEN DO ~GiveGoldForce(10000) IncrementGlobal("tb#lotrkilled","global",-100)~ GOTO adieux2
END

IF ~~ adieux2
SAY @16
IF ~Global("tb#lotrkilled","global",0)~ THEN DO ~GiveGoldForce(000)~ GOTO take
IF ~Global("tb#lotrkilled","global",1)~ THEN DO ~GiveGoldForce(100)~ GOTO take
IF ~Global("tb#lotrkilled","global",2)~ THEN DO ~GiveGoldForce(200)~ GOTO take
IF ~Global("tb#lotrkilled","global",3)~ THEN DO ~GiveGoldForce(300)~ GOTO take
IF ~Global("tb#lotrkilled","global",4)~ THEN DO ~GiveGoldForce(400)~ GOTO take
IF ~Global("tb#lotrkilled","global",5)~ THEN DO ~GiveGoldForce(500)~ GOTO take
IF ~Global("tb#lotrkilled","global",6)~ THEN DO ~GiveGoldForce(600)~ GOTO take
IF ~Global("tb#lotrkilled","global",7)~ THEN DO ~GiveGoldForce(700)~ GOTO take
IF ~Global("tb#lotrkilled","global",8)~ THEN DO ~GiveGoldForce(800)~ GOTO take
IF ~Global("tb#lotrkilled","global",9)~ THEN DO ~GiveGoldForce(900)~ GOTO take
IF ~Global("tb#lotrkilled","global",10)~ THEN DO ~GiveGoldForce(1000)~ GOTO take
IF ~Global("tb#lotrkilled","global",11)~ THEN DO ~GiveGoldForce(1100)~ GOTO take
IF ~Global("tb#lotrkilled","global",12)~ THEN DO ~GiveGoldForce(1200)~ GOTO take
IF ~Global("tb#lotrkilled","global",13)~ THEN DO ~GiveGoldForce(1300)~ GOTO take
IF ~Global("tb#lotrkilled","global",14)~ THEN DO ~GiveGoldForce(1400)~ GOTO take
IF ~Global("tb#lotrkilled","global",15)~ THEN DO ~GiveGoldForce(1500)~ GOTO take
IF ~Global("tb#lotrkilled","global",16)~ THEN DO ~GiveGoldForce(1600)~ GOTO take
IF ~Global("tb#lotrkilled","global",17)~ THEN DO ~GiveGoldForce(1700)~ GOTO take
IF ~Global("tb#lotrkilled","global",18)~ THEN DO ~GiveGoldForce(1800)~ GOTO take
IF ~Global("tb#lotrkilled","global",19)~ THEN DO ~GiveGoldForce(1900)~ GOTO take
IF ~Global("tb#lotrkilled","global",20)~ THEN DO ~GiveGoldForce(2000)~ GOTO take
IF ~Global("tb#lotrkilled","global",21)~ THEN DO ~GiveGoldForce(2100)~ GOTO take
IF ~Global("tb#lotrkilled","global",22)~ THEN DO ~GiveGoldForce(2200)~ GOTO take
IF ~Global("tb#lotrkilled","global",23)~ THEN DO ~GiveGoldForce(2300)~ GOTO take
IF ~Global("tb#lotrkilled","global",24)~ THEN DO ~GiveGoldForce(2400)~ GOTO take
IF ~Global("tb#lotrkilled","global",25)~ THEN DO ~GiveGoldForce(2500)~ GOTO take
IF ~Global("tb#lotrkilled","global",26)~ THEN DO ~GiveGoldForce(2600)~ GOTO take
IF ~Global("tb#lotrkilled","global",27)~ THEN DO ~GiveGoldForce(2700)~ GOTO take
IF ~Global("tb#lotrkilled","global",28)~ THEN DO ~GiveGoldForce(2800)~ GOTO take
IF ~Global("tb#lotrkilled","global",29)~ THEN DO ~GiveGoldForce(2900)~ GOTO take
IF ~Global("tb#lotrkilled","global",30)~ THEN DO ~GiveGoldForce(3000)~ GOTO take
IF ~Global("tb#lotrkilled","global",31)~ THEN DO ~GiveGoldForce(3100)~ GOTO take
IF ~Global("tb#lotrkilled","global",32)~ THEN DO ~GiveGoldForce(3200)~ GOTO take
IF ~Global("tb#lotrkilled","global",33)~ THEN DO ~GiveGoldForce(3300)~ GOTO take
IF ~Global("tb#lotrkilled","global",34)~ THEN DO ~GiveGoldForce(3400)~ GOTO take
IF ~Global("tb#lotrkilled","global",35)~ THEN DO ~GiveGoldForce(3500)~ GOTO take
IF ~Global("tb#lotrkilled","global",36)~ THEN DO ~GiveGoldForce(3600)~ GOTO take
IF ~Global("tb#lotrkilled","global",37)~ THEN DO ~GiveGoldForce(3700)~ GOTO take
IF ~Global("tb#lotrkilled","global",38)~ THEN DO ~GiveGoldForce(3800)~ GOTO take
IF ~Global("tb#lotrkilled","global",39)~ THEN DO ~GiveGoldForce(3900)~ GOTO take
IF ~Global("tb#lotrkilled","global",40)~ THEN DO ~GiveGoldForce(4000)~ GOTO take
IF ~Global("tb#lotrkilled","global",41)~ THEN DO ~GiveGoldForce(4100)~ GOTO take
IF ~Global("tb#lotrkilled","global",42)~ THEN DO ~GiveGoldForce(4200)~ GOTO take
IF ~Global("tb#lotrkilled","global",43)~ THEN DO ~GiveGoldForce(4300)~ GOTO take
IF ~Global("tb#lotrkilled","global",44)~ THEN DO ~GiveGoldForce(4400)~ GOTO take
IF ~Global("tb#lotrkilled","global",45)~ THEN DO ~GiveGoldForce(4500)~ GOTO take
IF ~Global("tb#lotrkilled","global",46)~ THEN DO ~GiveGoldForce(4600)~ GOTO take
IF ~Global("tb#lotrkilled","global",47)~ THEN DO ~GiveGoldForce(4700)~ GOTO take
IF ~Global("tb#lotrkilled","global",48)~ THEN DO ~GiveGoldForce(4800)~ GOTO take
IF ~Global("tb#lotrkilled","global",49)~ THEN DO ~GiveGoldForce(4900)~ GOTO take
IF ~Global("tb#lotrkilled","global",50)~ THEN DO ~GiveGoldForce(5000)~ GOTO take
IF ~Global("tb#lotrkilled","global",51)~ THEN DO ~GiveGoldForce(5100)~ GOTO take
IF ~Global("tb#lotrkilled","global",52)~ THEN DO ~GiveGoldForce(5200)~ GOTO take
IF ~Global("tb#lotrkilled","global",53)~ THEN DO ~GiveGoldForce(5300)~ GOTO take
IF ~Global("tb#lotrkilled","global",54)~ THEN DO ~GiveGoldForce(5400)~ GOTO take
IF ~Global("tb#lotrkilled","global",55)~ THEN DO ~GiveGoldForce(5500)~ GOTO take
IF ~Global("tb#lotrkilled","global",56)~ THEN DO ~GiveGoldForce(5600)~ GOTO take
IF ~Global("tb#lotrkilled","global",57)~ THEN DO ~GiveGoldForce(5700)~ GOTO take
IF ~Global("tb#lotrkilled","global",58)~ THEN DO ~GiveGoldForce(5800)~ GOTO take
IF ~Global("tb#lotrkilled","global",59)~ THEN DO ~GiveGoldForce(5900)~ GOTO take
IF ~Global("tb#lotrkilled","global",60)~ THEN DO ~GiveGoldForce(6000)~ GOTO take
IF ~Global("tb#lotrkilled","global",61)~ THEN DO ~GiveGoldForce(6100)~ GOTO take
IF ~Global("tb#lotrkilled","global",62)~ THEN DO ~GiveGoldForce(6200)~ GOTO take
IF ~Global("tb#lotrkilled","global",63)~ THEN DO ~GiveGoldForce(6300)~ GOTO take
IF ~Global("tb#lotrkilled","global",64)~ THEN DO ~GiveGoldForce(6400)~ GOTO take
IF ~Global("tb#lotrkilled","global",65)~ THEN DO ~GiveGoldForce(6500)~ GOTO take
IF ~Global("tb#lotrkilled","global",66)~ THEN DO ~GiveGoldForce(6600)~ GOTO take
IF ~Global("tb#lotrkilled","global",67)~ THEN DO ~GiveGoldForce(6700)~ GOTO take
IF ~Global("tb#lotrkilled","global",68)~ THEN DO ~GiveGoldForce(6800)~ GOTO take
IF ~Global("tb#lotrkilled","global",69)~ THEN DO ~GiveGoldForce(6900)~ GOTO take
IF ~Global("tb#lotrkilled","global",70)~ THEN DO ~GiveGoldForce(7000)~ GOTO take
IF ~Global("tb#lotrkilled","global",71)~ THEN DO ~GiveGoldForce(7100)~ GOTO take
IF ~Global("tb#lotrkilled","global",72)~ THEN DO ~GiveGoldForce(7200)~ GOTO take
IF ~Global("tb#lotrkilled","global",73)~ THEN DO ~GiveGoldForce(7300)~ GOTO take
IF ~Global("tb#lotrkilled","global",74)~ THEN DO ~GiveGoldForce(7400)~ GOTO take
IF ~Global("tb#lotrkilled","global",75)~ THEN DO ~GiveGoldForce(7500)~ GOTO take
IF ~Global("tb#lotrkilled","global",76)~ THEN DO ~GiveGoldForce(7600)~ GOTO take
IF ~Global("tb#lotrkilled","global",77)~ THEN DO ~GiveGoldForce(7700)~ GOTO take
IF ~Global("tb#lotrkilled","global",78)~ THEN DO ~GiveGoldForce(7800)~ GOTO take
IF ~Global("tb#lotrkilled","global",79)~ THEN DO ~GiveGoldForce(7900)~ GOTO take
IF ~Global("tb#lotrkilled","global",80)~ THEN DO ~GiveGoldForce(8000)~ GOTO take
IF ~Global("tb#lotrkilled","global",81)~ THEN DO ~GiveGoldForce(8100)~ GOTO take
IF ~Global("tb#lotrkilled","global",82)~ THEN DO ~GiveGoldForce(8200)~ GOTO take
IF ~Global("tb#lotrkilled","global",83)~ THEN DO ~GiveGoldForce(8300)~ GOTO take
IF ~Global("tb#lotrkilled","global",84)~ THEN DO ~GiveGoldForce(8400)~ GOTO take
IF ~Global("tb#lotrkilled","global",85)~ THEN DO ~GiveGoldForce(8500)~ GOTO take
IF ~Global("tb#lotrkilled","global",86)~ THEN DO ~GiveGoldForce(8600)~ GOTO take
IF ~Global("tb#lotrkilled","global",87)~ THEN DO ~GiveGoldForce(8700)~ GOTO take
IF ~Global("tb#lotrkilled","global",88)~ THEN DO ~GiveGoldForce(8800)~ GOTO take
IF ~Global("tb#lotrkilled","global",89)~ THEN DO ~GiveGoldForce(8900)~ GOTO take
IF ~Global("tb#lotrkilled","global",90)~ THEN DO ~GiveGoldForce(9000)~ GOTO take
IF ~Global("tb#lotrkilled","global",91)~ THEN DO ~GiveGoldForce(9100)~ GOTO take
IF ~Global("tb#lotrkilled","global",92)~ THEN DO ~GiveGoldForce(9200)~ GOTO take
IF ~Global("tb#lotrkilled","global",93)~ THEN DO ~GiveGoldForce(9300)~ GOTO take
IF ~Global("tb#lotrkilled","global",94)~ THEN DO ~GiveGoldForce(9400)~ GOTO take
IF ~Global("tb#lotrkilled","global",95)~ THEN DO ~GiveGoldForce(9500)~ GOTO take
IF ~Global("tb#lotrkilled","global",96)~ THEN DO ~GiveGoldForce(9600)~ GOTO take
IF ~Global("tb#lotrkilled","global",97)~ THEN DO ~GiveGoldForce(9700)~ GOTO take
IF ~Global("tb#lotrkilled","global",98)~ THEN DO ~GiveGoldForce(9800)~ GOTO take
IF ~Global("tb#lotrkilled","global",99)~ THEN DO ~GiveGoldForce(9900)~ GOTO take
IF ~Global("tb#lotrkilled","global",100)~ THEN DO ~GiveGoldForce(10000)~ GOTO take
IF ~GlobalGT("tb#lotrkilled","global",100)~ THEN DO ~GiveGoldForce(10000) IncrementGlobal("tb#lotrkilled","global",-100)~ GOTO adieux2
END


IF ~~ take
SAY @17
++ @18 + end
++ @19 + end
++ @20 + help
END

IF ~~ end
SAY @21
++ @22 EXIT
++ @23 + help
END

IF ~NumTimesTalkedTo(0)~ firstmeet
SAY @24
++ @25 + yes
++ @26 + no
++ @27 + help
++ @28 + getlost
+ ~GlobalLT("chapter","global",5)~ + @29 +c2
+ ~GlobalGT("chapter","global",4)~ + @29 +c6
END

IF ~~ yes
SAY @30
++ @31 + yes2
++ @32 + no2
++ @28 + getlost
++ @27 + help
END

IF ~~ no
SAY @33
++ @31 + yes2
++ @32 + no2
++ @28 + getlost
++ @34 + help
END

IF ~~ c2
SAY @35
= @36
++ @25 + yes
++ @26 + no
++ @27 + help
++ @28 + getlost
END

IF ~~ c6
SAY @37
= @36
++ @25 + yes
++ @26 + no
++ @27 + help
++ @28 + getlost
END

IF ~~ help
SAY @38
IF ~~ THEN DO ~Enemy()~ EXIT
END

IF ~~ getlost
SAY @39
IF ~~ THEN EXIT
END

IF ~~ no2
SAY @40
IF ~~ THEN EXIT
END

IF ~~ yes2
SAY @41
++ @42 + yes3
++ @43 + no3
++ @28 + getlost
++ @34 + help
END

IF ~~ no3
SAY @44
IF ~~ THEN EXIT
END

IF ~~ yes3
SAY @45
= @46
++ @47 + gonow
++ @48 DO ~SetGlobal("tb#lotrwaits","global",1)~ + wait
++ @43 + no3
++ @28 + getlost
++ @34 + help
END

IF ~~ wait
SAY @49
IF ~~ THEN EXIT END

IF ~Global("tb#lotrwaits","global",1)~ waited
SAY @50
= @46
++ @51 + yes2
++ @52 + gonow
++ @48 DO ~SetGlobal("tb#lotrwaits","global",1)~ + wait
++ @43 + no3
++ @28 + getlost
++ @34 + help
END

IF ~True()~ pissedoff
SAY @53
++ @54 + no
++ @28 + getlost
++ @34 + help
END

IF ~~ gonow
SAY @55
= @56
= @57
++ @58 + gonow2
++ @59 DO ~SetGlobal("tb#lotrwaits","global",1)~ + wait
END

IF ~~ gonow2
SAY @60
IF ~~ THEN DO ~DestroySelf()
    ActionOverride(Player1Fill,LeaveAreaLUA("BI0001","",[1184.864],0))
    ActionOverride(Player2Fill,LeaveAreaLUA("BI0001","",[1248.800],0))
    ActionOverride(Player3Fill,LeaveAreaLUA("BI0001","",[1120.928],0))
    ActionOverride(Player4Fill,LeaveAreaLUA("BI0001","",[1248.864],0))
    ActionOverride(Player5Fill,LeaveAreaLUA("BI0001","",[1184.928],0))
    ActionOverride(Player6Fill,LeaveAreaLUA("BI0001","",[1248.928],0))~ EXIT END

    /*  enemies       W
    	enemies    2  A
		 1 4  L
	       3 5 6  L

  WALL WALL WALL WALL
	       */

BEGIN ~tb#lotr1~  //second - in - command
IF ~NumTimesTalkedTo(0)~ die
SAY @61 = @62 = @63
++ @64 + who
++ @65 EXIT
++ @66 + who
END

IF ~~ who
SAY @67
IF ~~ THEN EXIT
END

BEGIN ~tb#lotrg~
IF ~NumTimesTalkedTo(0)~ hullo
SAY @68= @69 = @70
++ @71 + why
++ @72 + spy
++ @73 + not_listen
++ @74 +die
END

IF ~~ why
SAY @75
++ @76 + bigwords
++ @77 + not_listen
++ @78 + spy
++ @79 + die
END

IF ~~ not_listen
SAY @80
++ @81 + forced
++ @79 + die
++ @82 + spy
++ @83 + bigwords

END

IF ~~ spy
SAY @84
IF ~~ THEN GOTO die
END

IF ~~ bigwords
SAY @85
IF ~~ THEN GOTO die
END

IF ~~ forced
SAY @86
++ @87 + dont_fight
END

IF ~~ dont_fight
SAY @88 = @89
++ @90 + die
+ ~Exists(Player2)~ + @91 DO ~ActionOverride(Player2,LeaveParty()) ActionOverride(Player2,DestroySelf()) ReputationInc(-5) SetGlobal("d0change","global",-5)~ + another
+ ~Exists(Player3)~ + @92 DO ~ActionOverride(Player3,LeaveParty()) ActionOverride(Player3,DestroySelf()) ReputationInc(-5) SetGlobal("d0change","global",-5)~ + another
+ ~Exists(Player4)~ + @93 DO ~ActionOverride(Player4,LeaveParty()) ActionOverride(Player4,DestroySelf()) ReputationInc(-5) SetGlobal("d0change","global",-5)~ + another
+ ~Exists(Player5)~ + @94 DO ~ActionOverride(Player5,LeaveParty()) ActionOverride(Player5,DestroySelf()) ReputationInc(-5) SetGlobal("d0change","global",-5)~ + another
+ ~Exists(Player6)~ + @95 DO ~ActionOverride(Player6,LeaveParty()) ActionOverride(Player6,DestroySelf()) ~ + another
+ ~PartyHasItem("misc7v")~ + @96 DO ~TakePartyItem("misc7v")~ + another
+ ~PartyHasItem("misc7u")~ + @97 DO ~TakePartyItem("misc7u")~ + another
+ ~PartyHasItem("leat21")~ + @98 DO ~TakePartyItem("leat21") ReputationInc(-2) SetGlobal("d0change","global",-2)~ + another
+ ~PartyHasItem("leat22")~ + @98 DO ~TakePartyItem("leat22") ReputationInc(-2) SetGlobal("d0change","global",-2)~ + another
END

IF ~~ another
SAY @99
IF ~~ THEN GOTO hungry
END

IF ~~ hungry
SAY @100
++ @90 + die
+ ~Exists(Player2)~ + @91 DO ~ActionOverride(Player2,LeaveParty()) ActionOverride(Player2,DestroySelf()) ReputationInc(-5) IncrementGlobal("d0change","global",-5)~ + another
+ ~Exists(Player3)~ + @92 DO ~ActionOverride(Player3,LeaveParty()) ActionOverride(Player3,DestroySelf()) ReputationInc(-5) IncrementGlobal("d0change","global",-5)~ + another
+ ~Exists(Player4)~ + @93 DO ~ActionOverride(Player4,LeaveParty()) ActionOverride(Player4,DestroySelf()) ReputationInc(-5) IncrementGlobal("d0change","global",-5)~ + another
+ ~Exists(Player5)~ + @94 DO ~ActionOverride(Player5,LeaveParty()) ActionOverride(Player5,DestroySelf()) ReputationInc(-5) IncrementGlobal("d0change","global",-5)~ + another
+ ~Exists(Player6)~ + @95 DO ~ActionOverride(Player6,LeaveParty()) ActionOverride(Player6,DestroySelf()) ReputationInc(-5) IncrementGlobal("d0change","global",-5)~ + another
+ ~PartyHasItem("misc7v")~ + @96 DO ~TakePartyItem("misc7v")~ + another
+ ~PartyHasItem("misc7u")~ + @97 DO ~TakePartyItem("misc7u")~ + another
+ ~PartyHasItem("leat21")~ + @98 DO ~TakePartyItem("leat21") ReputationInc(-2) IncrementGlobal("d0change","global",-2)~ + another
+ ~PartyHasItem("leat22")~ + @98 DO ~TakePartyItem("leat22") ReputationInc(-2) IncrementGlobal("d0change","global",-2)~ + another
++ @101 + hungry
END

IF ~~ die
SAY @102
IF ~~ THEN EXIT
END

