anchor.diff:        Scenes.SetScene(scStatistics);
       TK_O:
         Scenes.SetScene(scOptions);
  -    TK_V:
  -      if Game.Wizard then
  -        Scenes.SetScene(scWin);
       TK_B:
  -      if Game.Wizard then
  -        Scenes.SetScene(scDef);
  +      Scenes.SetScene(scSpells);
       TK_SLASH:
         Scenes.SetScene(scHelp);
       TK_Y:
  
positive.code: type
    TSceneEnum = (scTitle, scLoad, scHelp, scGame, scQuit, scWin, scDef, scInv,
      scDrop, scItems, scAmount, scPlayer, scMessages, scStatistics, scDialog,
      scSell, scRepair, scBuy, scCalendar, scDifficulty, scRest, scName, scOptions);
    // scSpells, scIdentification
  
  type
    TScene = class(TObject)
  
negative.code:         FScene[I] := TSceneName.Create;
        scOptions:
          FScene[I] := TSceneOptions.Create;
        scSpells:
          FScene[I] := TSceneSpells.Create;
      end;
  end;
  
  