scn TTWCG00DoorScript  

short iMessageShown  
short iMessageToShow  
short iButtonPressed  
short iAwaitingInput  
short iGameChoice        ;1 = start in NV, 2 = Start in CW  
short iDoOnce  
float fTimer  

   

begin OnActivate player

          if (iMessageShown)  
          else  
              if (iMessageToShow == 0)  
                  set iMessageShown to 1  
                  set iAwaitingInput to 1  
                  set fTimer to 5  
                  ShowMessage TTWNewGameStartMSG  
              elseif (iMessageToShow == 1)                            ;Timed out or interupted by another messagebox so buttonpressed invalid  
                  set iMessageShown to 2  
                  set iAwaitingInput to 1  
                  set fTimer to 5  
                  ShowMessage TTWNewGameStartTryAgainMSG                ;Explain to player so they don't think we're stupid.  
              endif  
          endif  
end

begin gamemode

          if (iAwaitingInput)  
              set iButtonPressed to GetButtonPressed  
              if (iButtonPressed > -1)  
                  set iAwaitingInput to 0  
                    
                  if (iMessageShown)  
                      if (iButtonPressed == 0)            ;New Vegas  
                          set iGameChoice to 0  
                          setstage VCG00 0  
                      elseif(iButtonPressed == 1)            ;Fallout 3  
                          set iGameChoice to 0  
                          setstage CG00V101 0  
                      endif  
                  endif  
              endif  
          endif  
            
          if (fTimer > 0)  
              set fTimer to fTimer - GetSecondsPassed  
          else  
              if (iGameChoice == 0)  
                  set iMessageToShow to 1  
                  set iMessageShown to 0  
                  set iAwaitingInput to 0  
              endif  
          endif  
        
          if (iGameChoice)  
              StopQuest TTWCG00  
          endif  

end