#
#
#
#  quick and dirty exit/enter script
#  better turn off your relogger!

echo "How many enter/exit cycles?  "
getConsoleInput $cycles
echo "And your game password?  "
getConsoleInput $password

goSub :checkCommandPrompt~main

setVar $i 0
while ($i < $cycles)  
  killTrigger pause
  killTrigger enterYourChoice
  killTrigger showLog
  killTrigger thisCopy
  killTrigger passwordTrigger
  killTrigger preAvoidPauseTrigger
  killTrigger clearAvoids
  killTrigger commandPrompt
  
  add $i 1
  setTextTrigger enterYourChoice :enterYourChoice "Enter your choice: "
  send "qyn"
  pause
  :enterYourChoice
  setTextTrigger showLog :showLog "Show today's log?"
  send "t*"
  pause
  :showLog
  setTextLineTrigger thisCopy :thisCopy "This copy of TW2002 is"
  send "*"
  pause
  :thisCopy
  setTextLineTrigger passwordTrigger :passwordTrigger "A password is required to enter this game."
  send "*"
  pause
  :passwordTrigger
  send $password
  :preAvoidPauseTrigger
  killTrigger clearAvoids
  killTrigger commandPrompt
  setTextTrigger pause :preAvoidPauseTrigger "[Pause]"
  setTextTrigger clearAvoids :clearAvoids "Do you wish to clear some avoids" 
  setTextTrigger commandPrompt :commandPrompt "Command [TL="
  send "*"
  pause
  # put check here for invalid password
  :clearAvoids
  send "n"
  pause
  :commandPrompt
end



halt
include "lib\checkCommandPrompt.ts"
