Animation unique, annulé dès que le joueur bouge [RESOLU]

function hHotspot1_Interact() //j'ai d'abord tenté avec une région, mais pas de succès
                                  //avec les "Walk On Region" et "While Standing On Region", etc.)
{
  cKeum.LockView(6); //cKeum est le perso. La view 6 contient les animations uniques, dont la danse.
cKeum.Animate(1, 1, eRepeat, eNoBlock, eForwards);

if (cKeum.Moving){ // Là, je tente un truc, un peu au pif je dois bien l'admettre.
                  //Mais j'ai pas encore trouvé d'alternative...
cKeum.UnlockView();
cKeum.ChangeView(4); //On revient à la view normale du perso, avec ses loops de déplacements de base.
}}

function room_RepExec()
{
  // Ce qui suit sera exécuté à chaque cycle de jeu (40 par secondes)
  if ((cKeum.View == 6) && (cKeum.Moving)) // Si cKeum est en vue de danse et s'il se déplace
    cKeum.UnlockView(); // On débloque la vue, ce qui a pour effet automatique de rendre la vue normale au personnage, donc pas besoin de ChangeView
}

function hHotspot1_Interact()
{
  cKeum.LockView(6); //cKeum est le perso. La view 6 contient les animations uniques, dont la danse.
  cKeum.Animate(1, 1, eRepeat, eNoBlock, eForwards);
}

function on_mouse_click (MouseButton button)
{
  // Ce qui suit sera exécuté à chaque clic du joueur
  if (cKeum.View == 6 ) { // Si cKeum est en vue de danse
    cKeum.UnlockView(); // On débloque la vue, ce qui a pour effet automatique de rendre la vue normale au personnage, donc pas besoin de ChangeView
  }
}
   
function hHotspot1_Interact()
{
  cKeum.LockView(6); //cKeum est le perso. La view 6 contient les animations uniques, dont la danse.
  cKeum.Animate(1, 1, eRepeat, eNoBlock, eForwards);
}

function hHotspot1_Interact()
{
  StartCutscene(eSkipMouseClick); //On commence une cinématique, skippable par clic de souris
    cKeum.LockView(6); //cKeum est le perso. La view 6 contient les animations uniques, dont la danse.
    cKeum.Animate(1, 1, eRepeat, eNoBlock, eForwards);
    Wait(5*60*40); //on attend 5 min, en regardant cKeum danser.
    cKeum.UnlockView(); //cKeum s'arrête de danser.
    cKeum.Say("J'ai assez dansé tout seul comme un débile pour l'instant"); //Il se justifie
  EndCutscene(); //la cutscene s'arrête là.
}

// room script file


function room_Load()
{
  region[2].Enabled = true; //C'est la région qui empeche temporairement d'aller a la room07 (les WC),
                            //elle sera désactivée après un certain dialogue avec la Barmaid, directement dans le "dDialog1"
  cBarmaid.FaceCharacter(cKeum);
  object[2].Clickable = 0; //Empeche de pouvoir cliquer sur le PNG d'effet de lumiere sur toute la room, et d'interagir avec le reste.
  aNiteklubIN.Play(eAudioPriorityNormal, eRepeat);
}








function room_RepExec_always() // Ce qui suit sera exécuté à chaque cycle de jeu (40 par secondes)
{

  if (!cWalk01.Moving)
  {
    if (cWalk01.x < 100)
    {
cWalk01.Walk(560, 450);
cWalk01.AddWaypoint(1440, 540);
cWalk01.AddWaypoint(540, 580);
    }
   
    else
    {
      // otherwise, move it towards the left
cWalk01.Walk(1500, 540);
cWalk01.AddWaypoint(430, 500);
cWalk01.AddWaypoint(120, 415);
      //OU ALORS > cChar1.Walk(0, cChar1.y, eNoBlock, eAnywhere);
    }
  }
 
    if (!cWalk02.Moving)
  {
    if (cWalk02.x > 100)
    {

cWalk02.Walk(660, 450);
cWalk02.AddWaypoint(1440, 540);
cWalk02.AddWaypoint(540, 580);
    }
    else
    {
cWalk02.Walk(1500, 540);
cWalk02.AddWaypoint(430, 500);
cWalk02.AddWaypoint(120, 415);

    }
  }
}









function room_LeaveLeft()
{
cKeum.ChangeRoom(3, 880, 540);
aNiteklubIN.Stop();
aBeachAmb.Play(eAudioPriorityNormal, eRepeat);
aNiteklubOUT.Play(eAudioPriorityNormal, eRepeat);
}









function room_AfterFadeIn()
{
oDancer01.SetView(16);
oDancer01.Animate(0, 1, eRepeat, eNoBlock, eForwards);

oDancer02.SetView(17);
oDancer02.Animate(0, 1, eRepeat, eNoBlock, eForwards);
}












//                  !!!! QUAND LE PERSO ET LA BARMAID SE RENCONTRE POUR LA PREMIERE FOIS !!!!
bool bFirstTimeMeet = true;

function region1_WalksOnto()
{
  if (bFirstTimeMeet) {
  cKeum.StopMoving();
  cBarmaid.FaceCharacter(cKeum, eBlock);
  cBarmaid.Say("Hey, mais j'te connais toi !");
  cKeum.Walk(1700, 435, eNoBlock, eWalkableAreas);
  region[1].Enabled = false;
}
bFirstTimeMeet = false;
}










//        !!!! FUNCTION POUR QUE LE PERSO DANSE SUR LE DANCEFLOOR PUIS ARRETE DES QU'IL BOUGE !!!!


/*  ANCIEN CODE, temporairement désactivé. Le code original de Billbis est juste à la suite !
bool bFirstDanceFloor = true;

function hHotspot1_Interact()
{
  StartCutscene(eSkipMouseClick);
    cKeum.LockView(6);
    cKeum.Animate(1, 1, eRepeat, eNoBlock, eForwards);
    Wait(5*60*40);
    cKeum.UnlockView();
      EndCutscene();
     
    if (bFirstDanceFloor) {
    cKeum.Say("J'suis tout fatigué de danser !");
    }
    bFirstDanceFloor = false;

}
*/



function hHotspot1_Interact()
{
  StartCutscene(eSkipMouseClick);
    cKeum.LockView(6);
    cKeum.Animate(1, 1, eRepeat, eNoBlock, eForwards);
    Wait(5*60*40);
    cKeum.UnlockView();
    cKeum.Say("J'suis tout fatigué de danser !");
  EndCutscene();
}




function region2_WalksOnto()
{
cKeum.StopMoving();
cKeum.Think("J'crois que je devrais d'abord aller parler à la nana du bar.");
cKeum.Walk(1960, 550, eBlock, eWalkableAreas);
}






function region3_WalksOnto()
{
cKeum.ChangeRoom(7, 230, 530);
cBarmaid.ChangeRoom(7, 110, 530);
aNiteklubIN.Stop();
aNiteklubOUT.Play();
}






bool bDancer01Talk = true;

function oDancer01_Interact()
{
if (bDancer01Talk) {
  cKeum.Walk(460, 560, eBlock, eWalkableAreas);
    cKeum.FaceObject(oDancer01);
cKeum.Say("Salut Mignonne !");
Wait(60);
cKeum.Say("Wahou, ce vent ! Il m'a presque décoiffé.");
}
bDancer01Talk = false;
}






bool bDancer02Talk = true;

function oDancer02_Interact()
{
if (bDancer02Talk) {
  cKeum.Walk(990, 520, eBlock, eWalkableAreas);
  cKeum.FaceObject(oDancer02);
cKeum.Say("Bonsoir, on danse ?");
Wait(60);
cKeum.Say("Je lui fait tellement d'effet qu'elle n'ose pas me parler.");
cKeum.Say("Ni me regarder, elle m'ignore même totalement, c'est vraiment mignon !");
}
bDancer02Talk = false;
}

function room_FirstLoad()
{
 
region[1].Enabled = false;
  StartCutscene(eSkipAnyKeyOrMouseClick); //on commence une cutscene skippable
  cKeum.LockView(KEUM01STANDUP);
      cKeum.x = 318; //Pour rattraper le leger décalage sur le coté de l'animation unique :/
  cKeum.Animate(0, 105, eOnce, eBlock);
  cKeum.LockView(KEUM01STANDUP);
  cKeum.Animate(1, 1, eOnce, eBlock);
  cKeum.UnlockView(); // on reviens à la vue Normale
    cKeum.x = 308;
  cKeum.Say("Mais... Qu'est-ce que je fous là ?");
  cKeum.Say("Elle est où la putain d'logique ?!");
  cKeum.x = 293;
    cKeum.LockView(KEUM01ETONNE);
      cKeum.Animate(0, 2, eOnce, eBlock);
  cKeum.x = 308;
    cKeum.Say("Et pourquoi que j'suis en p'tit slip ?");
      cKeum.x = 293;
  player.FaceObject(oR01_DoorClose);
    cKeum.UnlockView();
          cKeum.x = 308;
 EndCutscene(); //fin de la cinématique d'intro
}

// new module script
bool DefaultMouseBehavior = true;
 
function CursorAspect()  //Change MouseMode in fonctions of underlying object
{
  if (DefaultMouseBehavior) { //Just a bool to deactivate this during MiniGame
    int x = mouse.x;
    int y = mouse.y;
    if (player.ActiveInventory == null) {
      if (GetLocationType(x, y) == eLocationNothing) {
        if (mouse.Mode != eModeWalkto)
          mouse.Mode = eModeWalkto; // WalkTo mode if nothing under mouse
      }
      else if (GetLocationType(x, y) == eLocationHotspot) {
        Hotspot* OnMouseHotspot = Hotspot.GetAtScreenXY(x, y);
        if (!OnMouseHotspot.GetProperty("ChangeRoomOnClick")) { //A custom properties to trigger a custom MouseMode ChangeRoom
          if (mouse.Mode != eModeInteract) {
            mouse.Mode = eModeInteract; // Interact mode on Object
          }
        }
        else {
          if (mouse.Mode != eModeChangeRoo) {
            mouse.Mode = eModeChangeRoo; //My custom MouseMode ChangeRoom
          }
        }
      }
      else if (GetLocationType(x, y) == eLocationObject) {
        Object* OnMouseObject = Object.GetAtScreenXY(x, y);
        if (!OnMouseObject.GetProperty("ChangeRoomOnClick")) {
          if (mouse.Mode != eModeInteract) {
            mouse.Mode = eModeInteract; // Interact mode on Object
          }
        }
        else {
          if (mouse.Mode != eModeChangeRoo) {
            mouse.Mode = eModeChangeRoo; //My custom MouseMode ChangeRoom
          }
        }
      }
      else if (GetLocationType(x,  y) == eLocationCharacter) {
        if (mouse.Mode != eModeTalkto) {
          mouse.Mode = eModeTalkto; // TalkTo mode on character
        }
      }
      if (InventoryItem.GetAtScreenXY(x, y)!= null) { //no else here
        if (mouse.Mode != eModeInteract) {
          mouse.Mode = eModeInteract; //Take inventory item
        }
      }
    }
  }
}

// main global script file

// A function that initializes a bunch of stuff.
function initialize_control_panel() {
  // Centre the control panel
  gPanel.Centre();
  // Centre the Restart dialog as well
  gRestartYN.Centre();
  gQuit.Centre();
  if (!IsSpeechVoxAvailable()) {
    // If there is no speech-vox file, and therefore no speech,
    // disable all the controls related with speech.
    lblVoice.Visible = false; 
    http://btnVoice.Visible = false; 
    sldVoice.Visible = false;
  }
  else {
    // If there *is*, then set it to voice and text. It's best to use
    // both whenever possible, for the player's sake.
    SetVoiceMode(eSpeechVoiceAndText);
    // And reflect this in the control panel.
    http://btnVoice.Text = "Voice and Text";
  }
  if (!System.SupportsGammaControl) {
    // If we can't change the gamma settings, disable the relevant options.
    sldGamma.Visible = false;
    lblGamma.Visible = false;
  }
 
  //And now, set all the defaults
  System.Volume = 100;
  sldAudio.Value = System.Volume;
  SetGameSpeed(40);
  sldSpeed.Value = 40;
  if (IsSpeechVoxAvailable()) {
    SetVoiceMode(eSpeechVoiceAndText);
    http://btnVoice.Text = "Voice and Text";
    sldVoice.Value = 255;
    SetSpeechVolume(255);
  }
  if (System.SupportsGammaControl) {
    System.Gamma = 100;
    sldGamma.Value = 100;
  }
}

// Called when the game starts, before the first room is loaded
function game_start() { 
  // Put the code all in a function and then just call the function.
  // It saves cluttering up places like game_start.
  initialize_control_panel();
  // Use the KeyboardMovement module to, per default, replicate the standard
  // keyboard movement of most Sierra games. See KeyboardMovement.txt for more info
  KeyboardMovement.SetMode(eKeyboardMovement_Tapping);
}


  function repeatedly_execute(){

{
  CursorAspect();
}

      if (IsGamePaused() == 1) return;

}

function repeatedly_execute_always() {
 
  // Put anything you want to happen every game cycle, even
  // when the game is blocked inside a command like a
  // blocking Walk().
  // You cannot run blocking commands from this function.
 
}

function show_inventory_window ()
{
  gInventory.Visible = true;
  // switch to the Use cursor (to select items with)
  mouse.Mode = eModeInteract;
  // But, override the appearance to look like the arrow
  mouse.UseModeGraphic(eModePointer);
}

function show_save_game_dialog()
{
  gSaveGame.Visible = true;
  // Get the list of save games
  lstSaveGamesList.FillSaveGameList();
  if (lstSaveGamesList.ItemCount > 0)
  {
    // If there is at least one, set the default text
    // to be the first game's name
    txtNewSaveName.Text = lstSaveGamesList.Items[0];
  }
  else
  {
    // No save games yet, default empty text.
    txtNewSaveName.Text = "";
  }
  mouse.UseModeGraphic(eModePointer);
  gIconbar.Visible = false;
}

function show_restore_game_dialog()
{
  gRestoreGame.Visible = true;
  lstRestoreGamesList.FillSaveGameList();
  mouse.UseModeGraphic(eModePointer);
  gIconbar.Visible = false;
}

function close_save_game_dialog()
{
  gSaveGame.Visible = false;
  mouse.UseDefaultGraphic();
  gIconbar.Visible = true;
}

function close_restore_game_dialog()
{
  gRestoreGame.Visible = false;
  mouse.UseDefaultGraphic();
  gIconbar.Visible = true;
}

// Called when a key is pressed. keycode holds the key's ASCII code
function on_key_press(eKeyCode keycode) {
  // The following is called before "if game is paused keycode=0", so
  // it'll happen even when the game is paused.
 
  if ((keycode == eKeyEscape) && gRestartYN.Visible) {
    //Use ESC to cancel restart.
    gRestartYN.Visible = false;
    gIconbar.Visible = true;
    // If the panel's not ON, then the player must have gotten here by tapping F9,
    // therefore his cursor needs restoring. If the panel IS on, then it doesn't,
    // because it's already a pointer. Get used to thinking like this!!
    if (!gPanel.Visible) mouse.UseDefaultGraphic();
    return;
  }
  if ((keycode == eKeyEscape) && gPanel.Visible) {
    // Use ESC to turn the panel off.
    gPanel.Visible = false;
    mouse.UseDefaultGraphic();
    gIconbar.Visible = true;
    return;
  }
  if ((keycode == eKeyEscape) && (gSaveGame.Visible))
  {
    // Use ESC to close the save game dialog
    close_save_game_dialog();
    return;
  }
  if ((keycode == eKeyEscape) && (gRestoreGame.Visible))
  {
    // Use ESC to close the restore game dialog
    close_restore_game_dialog();
    return;
  }
 
  if (keycode == eKeyReturn) {
    // ENTER, in this case merely confirms restart
    if (gRestartYN.Visible) RestartGame();
  }

  if (IsGamePaused() || (IsInterfaceEnabled() == 0))
  {
    // If the game is paused with a modal GUI on the
    // screen, or the player interface is disabled in
    // a cut scene, ignore any keypresses.
    return;
  }

  // FUNCTION KEYS AND SYSTEM SHORTCUTS
  if (keycode == eKeyEscape) {
    // ESC
    gPanel.Visible = true;
    gIconbar.Visible = false;
    mouse.UseModeGraphic(eModePointer);
  }
  if (keycode == eKeyCtrlQ)  QuitGame(1);  // Ctrl-Q
  if (keycode == eKeyF5) show_save_game_dialog();  // F5
  if (keycode == eKeyF7) show_restore_game_dialog();  // F7
  if (keycode == eKeyF9) {
    // F9, asks the player to confirm restarting (so much better to always confirm first)
    gRestartYN.Visible = true; 
    gIconbar.Visible = false;
    mouse.UseModeGraphic(eModePointer);
  }
  if (keycode == eKeyF12) SaveScreenShot("scrnshot.bmp");  // F12
  if (keycode == eKeyTab)  show_inventory_window();  // Tab, show inventory

  // GAME COMMAND SHORTCUTS
  if (keycode == 'W') mouse.Mode=eModeWalkto; //Notice this alternate way to indicate keycodes.
  if (keycode == 'L') mouse.Mode=eModeLookat; //Note that all we do here is set modes.
  if (keycode == 'U') mouse.Mode=eModeInteract; //If you want something else to happen, such as GUI buttons highlighting,
  if (keycode == 'T') mouse.Mode=eModeTalkto; //you'll need some more scripting done.
  if (keycode == 'I') mouse.Mode=eModeUseinv; //But this will, as-is, give you some standard keyboard shortcuts your players will very much appreciate.

  // For extra cursor modes, such as pick up, feel free to add as you will.
  // Uncomment the line below if you use the "Pick Up" mode.
  //if (keycode == 'P' || keycode == 'G') mouse.Mode=eModePickup;

  // DEBUG FUNCTIONS
  if (keycode == eKeyCtrlS)  Debug(0,0);  // Ctrl-S, give all inventory
  if (keycode == eKeyCtrlV)  Debug(1,0);  // Ctrl-V, version
  if (keycode == eKeyCtrlA)  Debug(2,0);  // Ctrl-A, show walkable areas
  if (keycode == eKeyCtrlX)  Debug(3,0);  // Ctrl-X, teleport to room
  if (keycode == eKeyCtrlW && game.debug_mode)
    player.PlaceOnWalkableArea(); //Ctrl-W, move to walkable area
}




/*
//Vieux code pour l'interaction souris, à deux clics.
function on_mouse_click(MouseButton button) {

  if (IsGamePaused() == 1) {
  }
 
  else if (button == eMouseLeft)
  {
    if(GetLocationType(mouse.x, mouse.y) == eLocationNothing)
    {
      ProcessClick(mouse.x, mouse.y, eModeWalkto);
    }
    else
    {
      if(mouse.Mode == eModeUseinv)
      {
        ProcessClick(mouse.x, mouse.y, eModeUseinv);
      }
      else
      {
        ProcessClick(mouse.x,mouse.y, eModeInteract);
      }
    }
  }
  else if (button == eMouseRight)
  {
    if(mouse.Mode == eModeUseinv)
    {
      mouse.Mode = eModeInteract;
      player.ActiveInventory = null;
    }
    else
    {
      ProcessClick(mouse.x,mouse.y, eModeLookat);
    }
  }
*/
 
 
 
 
function on_mouse_click(MouseButton button) // called when a mouse button is clicked. button is either LEFT or RIGHT
{
  if (IsGamePaused() == 1) {// Game is paused, so do nothing (ie. don't allow mouse click)
  }
  else if (button == eMouseLeft) {
    if((player.ActiveInventory != null) && (GetLocationType(mouse.x, mouse.y) == eLocationNothing)){
      player.ActiveInventory = null; //left click on nothing with InvItem looses InvItem.
    } else {
      ProcessClick(mouse.x, mouse.y, mouse.Mode); //Left click on thing launch interaction
    }
  }
  else if (button == eMouseRight) {// right-click, so look at spot, and loss active.inventory
    if(player.ActiveInventory != null) {
      player.ActiveInventory = null;
    } else {
      ProcessClick(mouse.x, mouse.y, eModeLookat); //Look at things with right click
    }
  }
}
 
 
 
 
/*
//Code par défaut pour l'interaction de la souris
else if (button == eMouseLeft) {
ProcessClick(mouse.x, mouse.y, mouse.Mode );
}
else if (button == eMouseRight || button == eMouseWheelSouth){
mouse.SelectNextMode();
}
else if (button == eMouseMiddle) {
ProcessClick(mouse.x, mouse.y, eModeWalkto);
}
else if (button == eMouseWheelNorth) {
If mode isn't WALK, set the previous mode (notice usage of numbers instead
if (mouse.Mode>0) mouse.Mode=mouse.Mode-1;
else
{
// ...but if it is WALK mode...
if (player.ActiveInventory!=null)
{
//...and the player has a selected inventory item, set mouse mode to UseInv.
mouse.Mode=eModeUseinv;
}
else
{
//If they don't, however, just set it to mode TALK (change this line if you add more cursor modes)
mouse.Mode=eModeTalkto;
}}}}
*/





function interface_click(int interface, int button) {
  // This function is obsolete, from 2.62 and earlier versions.
}

function btnInvUp_Click(GUIControl *control, MouseButton button) {
  invCustomInv.ScrollUp();
}

function btnInvDown_Click(GUIControl *control, MouseButton button) {
  invCustomInv.ScrollDown();
}

function btnInvOK_Click(GUIControl *control, MouseButton button) {
   // They pressed the OK button, close the GUI
   gInventory.Visible = false;
   mouse.UseDefaultGraphic();
}

function btnInvSelect_Click(GUIControl *control, MouseButton button) {
 
   // They pressed SELECT, so switch to the Get cursor
   mouse.Mode = eModeInteract;
   // But, override the appearance to look like the arrow
   mouse.UseModeGraphic(eModePointer);
}

function btnIconInv_Click(GUIControl *control, MouseButton button) {
 
  show_inventory_window();
}

function btnIconCurInv_Click(GUIControl *control, MouseButton button) {
 
  if (player.ActiveInventory != null)
    mouse.Mode = eModeUseinv;
}

function btnIconSave_Click(GUIControl *control, MouseButton button)
{
  show_save_game_dialog();
}

function btnIconLoad_Click(GUIControl *control, MouseButton button)
{
  show_restore_game_dialog();
}

function btnIconExit_Click(GUIControl *control, MouseButton button) {
 
  //QuitGame(1);
  gQuit.Visible = true;
}

function btnIconAbout_Click(GUIControl *control, MouseButton button) {
 
  gPanel.Visible=true;
  gIconbar.Visible=false;
  mouse.UseModeGraphic(eModePointer);
}

function cEgo_Look()
{
  Display("Damn, I'm looking good!");
}

function cEgo_Interact()
{
  Display("You rub your hands up and down your clothes.");
}

function cEgo_Talk()
{
  Display("Talking to yourself is a sign of madness!");
}

//START OF CONTROL PANEL FUNCTIONS
function btnSave_OnClick(GUIControl *control, MouseButton button)
{
  gPanel.Visible = false;
  mouse.UseDefaultGraphic();
  gIconbar.Visible = true;
  Wait(1);
  btnIconSave_Click(btnIconSave, eMouseLeft);
}

function gControl_OnClick(GUI *theGui, MouseButton button)
{

}

function btnAbout_OnClick(GUIControl *control, MouseButton button)
{
Display("Last Night in Gretz - XZS 2013 (copyleft). V0.1d - Merci à Billbis, Kitai et Skippy92 du forum adventuregamestudio.1fr1.net pour leurs précieux conseils !.");
}

function btnQuit_OnClick(GUIControl *control, MouseButton button)
{
  gPanel.Visible = false;
  Wait(1);
  gQuit.Visible = true;
  //QuitGame(1);
  gPanel.Visible = true;
  gIconbar.Visible = false;
  http://mouse.UseModeGraphic(eModePointer);
}

function btnLoad_OnClick(GUIControl *control, MouseButton button)
{
  gPanel.Visible = false;
  mouse.UseDefaultGraphic();
  gIconbar.Visible = true;
  Wait(1);
  btnIconLoad_Click(btnIconLoad, eMouseLeft);
}

function btnResume_OnClick(GUIControl *control, MouseButton button)
{
  gPanel.Visible = false;
  mouse.UseDefaultGraphic();
  gIconbar.Visible = true;
}

function sldAudio_OnChange(GUIControl *control)
{
  System.Volume = sldAudio.Value;
}

function sldVoice_OnChange(GUIControl *control)
{
  // Sets voice volume. Note that we don't check for the existence of speech.vox -
  // we did that in game_start, so if it's not there the slider won't even be available.
  SetSpeechVolume(sldVoice.Value);
}

//function btnVoice_OnClick(GUIControl *control, MouseButton button)
//{
  // Note that we don't check for the existence of speech.vox - we did that in game_start,
  // so if it's not there the button won't even be available.
  //if (btnVoice.Text == "Voice and Text") {
    //SetVoiceMode(eSpeechVoiceOnly);
    http://btnVoice.Text = "Voice only";
  //}
  //else if (btnVoice.Text == "Voice only") {
    //SetVoiceMode(eSpeechTextOnly);
    http://btnVoice.Text = "Text only";
  //}
  //else if (btnVoice.Text == "Text only") {
    //SetVoiceMode(eSpeechVoiceAndText);
    http://btnVoice.Text = "Voice and Text";
  //}
//}

function sldGamma_OnChange(GUIControl *control)
{
  // Set the gamma. Note there's no need to check for anything else, as we ensured,
  // in game_start, that the slider won't even appear if it's not possible to do this.
  System.Gamma = sldGamma.Value;
}

function btnDefault_OnClick(GUIControl *control, MouseButton button)
{
  // Reset everything to default. You'll have to edit these as well as the sliders
  // if you'd rather have different default parameters.
  System.Volume = 100;
  sldAudio.Value = System.Volume;
  sldSpeed.Value = 40;
  SetGameSpeed(40);
  if (IsSpeechVoxAvailable()) {
    SetVoiceMode(eSpeechVoiceAndText);
    http://btnVoice.Text = "Voice and Text";
    sldVoice.Value = 255;
    SetSpeechVolume(255);
  }
  if (System.SupportsGammaControl) {
    System.Gamma = 100;
    sldGamma.Value = 100;
  }
}
//END OF CONTROL PANEL FUNCTIONS

function dialog_request(int param)
{
  // This is used by the dialog text parser if you need to process
  // text that the player types in to the parser.
  // It is not used by default.
}

function sldSpeed_OnChange(GUIControl *control)
{
  SetGameSpeed(sldSpeed.Value);
}

function btnRestart_OnClick(GUIControl *control, MouseButton button)
{
  gRestartYN.Visible=true;
  gIconbar.Visible=false;
}

function btnRestartYes_OnClick(GUIControl *control, MouseButton button)
{
  RestartGame();
}

function btnRestartNo_OnClick(GUIControl *control, MouseButton button)
{
  gRestartYN.Visible = false;
  gIconbar.Visible = true;
  // If the panel's not ON, then the player must have gotten here by tapping F9,
  // therefore his cursor needs restoring. If the panel IS on, then it doesn't,
  // because it's already a pointer. Get used to thinking like this!!
  if (!gPanel.Visible) mouse.UseDefaultGraphic();
}

function btnCancelSave_OnClick(GUIControl *control, MouseButton button)
{
  close_save_game_dialog();
}

function btnSaveGame_OnClick(GUIControl *control, MouseButton button)
{
  int gameSlotToSaveInto = lstSaveGamesList.ItemCount + 1;
  int i = 0;
  while (i < lstSaveGamesList.ItemCount)
  {
    if (lstSaveGamesList.Items[i] == txtNewSaveName.Text)
    {
      gameSlotToSaveInto = lstSaveGamesList.SaveGameSlots[i];
    }
    i++;
  }
  SaveGameSlot(gameSlotToSaveInto, txtNewSaveName.Text);
  close_save_game_dialog();
}

function btnCancelRestore_OnClick(GUIControl *control, MouseButton button)
{
  close_restore_game_dialog();
}

function btnRestoreGame_OnClick(GUIControl *control, MouseButton button)
{
  if (lstRestoreGamesList.SelectedIndex >= 0)
  {
    RestoreGameSlot(lstRestoreGamesList.SaveGameSlots[lstRestoreGamesList.SelectedIndex]);
  }
  close_restore_game_dialog();
}

function lstSaveGamesList_OnSelectionCh(GUIControl *control)
{
  txtNewSaveName.Text = lstSaveGamesList.Items[lstSaveGamesList.SelectedIndex];
}

function txtNewSaveName_OnActivate(GUIControl *control)
{
  // Pressing return in the text box simulates clicking the Save button
  btnSaveGame_OnClick(control, eMouseLeft);
}

function btnDeleteSave_OnClick(GUIControl *control, MouseButton button)
{
  if (lstSaveGamesList.SelectedIndex >= 0)
  {
    DeleteSaveSlot(lstSaveGamesList.SaveGameSlots[lstSaveGamesList.SelectedIndex]);
    lstSaveGamesList.FillSaveGameList();
  }
}

function cKeum_UseInv()
{
 if(player.ActiveInventory == iRobe) {
  cKeum.ChangerTenue(eTenue01);
 }
}


function iKey_Look()
{
Display("Une clé en forme d'Anne Roumanoff, avec la tige plantée dans le cul.");
}

function iRobe_Look()
{
Display("Des vêtements légèrement trop féminin pour être vraiment mon style.");
}


function bYesQuit_OnClick(GUIControl *control, MouseButton button)
{
  QuitGame(0); //on quitte SANS demander confirmation via le GUI moche AGS
}

function bNoQuit_OnClick(GUIControl *control, MouseButton button)
{
  gQuit.Visible = false;
}




function cVideur_Talk()
{
cKeum.FaceCharacter(cVideur);
dDialog0.Start();
}

function cBarmaid_Talk()
{
cKeum.Walk(1700, 435, eBlock, eWalkableAreas);
cKeum.FaceCharacter(cBarmaid);
cBarmaid.FaceCharacter(cKeum);
dDialog1.Start();
}

function cWalk02_Talk()
{
  cKeum.FaceCharacter(cWalk02);
  cWalk02.FaceCharacter(cKeum);
cWalk02.Think("Bleuuuargh...");
cKeum.Say("Il a pas l'air frais, lui.");
}

function cWalk01_Talk()
{
    cKeum.FaceCharacter(cWalk01);
  cWalk01.FaceCharacter(cKeum);
cWalk01.Think("Hey, tu... t'as... je le... de... burp.");
cKeum.Say("D'accord.");
}

function hHotspot1_Interact()
{
  StartCutscene(eSkipMouseClick);
  cKeum.LockView(6);
  cKeum.Animate(1, 1, eRepeat, eNoBlock, eForwards);
  if (!Game.SkippingCutscene) Wait(5*60*40);
  cKeum.UnlockView();
  if (!Game.SkippingCutscene) cKeum.Say("J'suis tout fatigué de danser !");
  EndCutscene();
}

function hHotspot1_Interact()
{
  StartCutscene(eSkipMouseClick);
    cKeum.LockView(6);
    cKeum.Animate(1, 1, eRepeat, eNoBlock, eForwards);
    int i = 0;
    while (i < 5*60*40) {
        i++;
        if (!Game.SkippingCutscene) {
          Wait(1);
        }
    }
    cKeum.UnlockView();
    if (!Game.SkippingCutscene) cKeum.Say("J'suis tout fatigué de danser !");
  EndCutscene();
}

Wait(5*60*GetGameSpeed());

Wait(12000);