// creator  : weidu.exe (version 23100)
// argument : ELEARB01.DLG
// game		 : .
// source	 : ./DATA/DIALOG.BIF
// dialog	 : ./DIALOG.TLK
// dialogF  : (none)

BEGIN ~ELEARB01~

IF ~NumTimesTalkedTo(0)
~ THEN BEGIN 0 // from:
  SAY #47814 /* ~Here begins the tests of madness, of sanity and clarity. Presented with nonsense how will you proceed?~ */
  IF ~~ THEN REPLY #47834 /* ~You wish to test me? But this place is derelict. The directors are dead.~ */ DO ~EraseJournalEntry(10140)
EraseJournalEntry(10140)~ GOTO 1
  IF ~~ THEN REPLY #47836 /* ~What is going on here? I demand to know!~ */ GOTO 1
END

IF ~~ THEN BEGIN 1 // from: 0.1 0.0
  SAY #47840 /* ~The procedures laid down proceed regardless of time or circumstance. Such is the nature of this place. Protests are futile.~ */
  IF ~~ THEN GOTO 2
END

IF ~~ THEN BEGIN 2 // from: 1.0
  SAY #47841 /* ~This area works on its own, allowing the directors to watch in safety. You are here, and there is no other way out. Comply or die. You are sane enough to understand that.~ */
  IF ~~ THEN GOTO 3
END

IF ~~ THEN BEGIN 3 // from: 2.0
  SAY #47842 /* ~Now, when madness beckoned, how did you answer? Now comes the judgement, when we decide your fitness for life outside.~ */
  IF ~~ THEN REPLY #47843 /* ~Then ask away, and I shall pass. I will not resist if it speeds the process.~ */ GOTO 4
  IF ~~ THEN REPLY #47844 /* ~Very well, do as you must, specter. I will not protest if it is pointless.~ */ GOTO 4
  IF ~~ THEN REPLY #47845 /* ~I refuse! This is pointless! Your purpose is long since expired!~ */ GOTO 5
  IF ~~ THEN REPLY #47846 /* ~I will battle you to the last!~ */ GOTO 5
END

IF ~~ THEN BEGIN 4 // from: 3.1 3.0
  SAY #47847 /* ~Very good. Restraint is a good sign. Perhaps you are closer to release than I thought. We shall see.~ */
  IF ~~ THEN DO ~IncrementGlobal("MindTestGood","GLOBAL",1)
StateOverrideFlag(TRUE)
CreateVisualEffectObject("SPCLOUD1",Player1)
CreateVisualEffectObject("SPCLOUD1",Player2)
CreateVisualEffectObject("SPCLOUD1",Player3)
CreateVisualEffectObject("SPCLOUD1",Player4)
CreateVisualEffectObject("SPCLOUD1",Player5)
CreateVisualEffectObject("SPCLOUD1",Player6)
FadeToColor([20.0],0)
Wait(1)
ActionOverride(Player1,LeaveAreaLUAPanic("AR1503","",[426.342],12))
ActionOverride(Player1,LeaveAreaLUA("AR1503","",[426.342],12))
ActionOverride(Player2,LeaveAreaLUA("AR1503","",[427.388],12))
ActionOverride(Player3,LeaveAreaLUA("AR1503","",[427.437],12))
ActionOverride(Player4,LeaveAreaLUA("AR1503","",[363.343],12))
ActionOverride(Player5,LeaveAreaLUA("AR1503","",[362.383],12))
ActionOverride(Player6,LeaveAreaLUA("AR1503","",[362.430],12))
ActionOverride(Player1,CreateVisualEffectObject("SPCLOUD1",Myself))
ActionOverride(Player1,FadeFromColor([20.0],0))
ActionOverride(Player2,CreateVisualEffectObject("SPCLOUD1",Myself))
ActionOverride(Player3,CreateVisualEffectObject("SPCLOUD1",Myself))
ActionOverride(Player4,CreateVisualEffectObject("SPCLOUD1",Myself))
ActionOverride(Player5,CreateVisualEffectObject("SPCLOUD1",Myself))
ActionOverride(Player6,CreateVisualEffectObject("SPCLOUD1",Myself))
ActionOverride(Player1,StateOverrideFlag(FALSE))
ActionOverride(Player1,MultiplayerSync())
~ EXIT
END

IF ~~ THEN BEGIN 5 // from: 3.3 3.2
  SAY #47849 /* ~Unfortunate that you insist on being difficult. There is no recourse. I am quite beyond your threats, and if you refuse the tasks you will languish here.~ */
  IF ~~ THEN GOTO 6
END

IF ~~ THEN BEGIN 6 // from: 5.0
  SAY #47850 /* ~I will arrange suitable punishment for your outburst. You will find that such obstinacy is painful, and that your path becomes more difficult.~ */
  IF ~~ THEN DO ~IncrementGlobal("MindTestBad","GLOBAL",1)
StateOverrideFlag(TRUE)
CreateVisualEffectObject("SPCLOUD1",Player1)
CreateVisualEffectObject("SPCLOUD1",Player2)
CreateVisualEffectObject("SPCLOUD1",Player3)
CreateVisualEffectObject("SPCLOUD1",Player4)
CreateVisualEffectObject("SPCLOUD1",Player5)
CreateVisualEffectObject("SPCLOUD1",Player6)
FadeToColor([20.0],0)
Wait(1)
ActionOverride(Player1,LeaveAreaLUAPanic("AR1509","",[907.579],6))
ActionOverride(Player1,LeaveAreaLUA("AR1509","",[907.579],6))
ActionOverride(Player2,LeaveAreaLUA("AR1509","",[862.614],6))
ActionOverride(Player3,LeaveAreaLUA("AR1509","",[814.655],6))
ActionOverride(Player4,LeaveAreaLUA("AR1509","",[973.611],6))
ActionOverride(Player5,LeaveAreaLUA("AR1509","",[924.643],6))
ActionOverride(Player6,LeaveAreaLUA("AR1509","",[873.674],6))
ActionOverride(Player1,CreateVisualEffectObject("SPCLOUD1",Myself))
ActionOverride(Player1,FadeFromColor([20.0],0))
ActionOverride(Player2,CreateVisualEffectObject("SPCLOUD1",Myself))
ActionOverride(Player3,CreateVisualEffectObject("SPCLOUD1",Myself))
ActionOverride(Player4,CreateVisualEffectObject("SPCLOUD1",Myself))
ActionOverride(Player5,CreateVisualEffectObject("SPCLOUD1",Myself))
ActionOverride(Player6,CreateVisualEffectObject("SPCLOUD1",Myself))
ActionOverride(Player1,StateOverrideFlag(FALSE))
ActionOverride(Player1,MultiplayerSync())
~ EXIT
END
