Myriad Forum « Script d'exportation »
 Welcome, Guest.
 You can read all messages, but to be able to post,
 please Login or Register.
Oct 18th, 2017, 11:36am 
   Myriad Forum
   MyrScript Language
(Moderator: Forum Administrator)
   Script d'exportation
« Previous topic | Next topic »
Pages: 1  Reply | Notify of replies | Print
   Author  Topic: Script d'exportation  (Read 276 times)
jpwitz
Board Newbie
*





   


Posts: 17
Script d'exportation  
« on: Jan 18th, 2017, 9:26am »
Quote | Modify

Bonjour
Je voudrais créer un script qui fasse, sur une partition à 4 portées(sopran-alto-ténor-basse) qui est à l'écran la chose suivante :
- Mettre au maximum, dans la table de mixage, le volume du sopran
- Mettre au minimum le volume des autres voix
- exporter la partition au format 'myriad web' en donnant au fichier export le nom de la partition suivi du nom de la portée (ex: NompartititonSopran.myrweb.html)
- faire la même chose pour les autres voix
Je découvre MyrScript et pour l'instant je rame....
offline
bubu42
Board Master
*****





   


Gender: male
Posts: 8494
Re: Script d'exportation  
« Reply #1 on: Jan 18th, 2017, 10:04am »
Quote | Modify

Le plus simple, à mon avis, est d'éditer un script déjà existant et de le modifier. Pour éditer un script, il faut cliquer sur son nom dans la liste en maintenant appuyée la touche Ctrl (command chez Apple). On commence par l'enregistrer sous un autre nom et on analyse, puis on modifie.
Dans le cas présent, un script concernant les portées (extracteur de portées par exemple, qui a l'avantage de montrer comment on gère un dialogue) ou un concernant les fichiers peuvent s'avérer utiles.
offline
jihel9
Board Master
*****




baryton

   
Email

Gender: male
Posts: 1934
Re: Script d'exportation   export_myrweb.msa
« Reply #2 on: Jan 18th, 2017, 10:09am »
Quote | Modify

Voici déjà un début.
Je l'utilise tel quel.
Au lancement, choisir le fichier à exporter.
Éventuellement, modifier les options dans le mode avancé.
Les fichiers créés se placent dans un répertoire MP3 sous le répertoire d'origine, mais cela peut se modifier sans peine.
 
Bonne journée.
offline

Jean Louis, à Anthisnes (25 Km au sud de Liège)
Harmony Assistant, la dernière version
Win 10, Intel I3-5010U, 8gb, Chrome / Firefox / Edge
francophone (traduction automatique des autres langues)
jpwitz
Board Newbie
*





   


Posts: 17
Re: Script d'exportation  
« Reply #3 on: Jan 18th, 2017, 6:21pm »
Quote | Modify

Merci à vous. Je progresse....
J'ai trouvé (entre autres) la syntaxe d'accès à la partition active :
score=FrontScore()
 
Mais quelle syntaxe pour accéder à une portée et au volume de ceztt portée dans la table de mixage
offline
jihel9
Board Master
*****




baryton

   
Email

Gender: male
Posts: 1934
Re: Script d'exportation  
« Reply #4 on: Jan 18th, 2017, 10:44pm »
Quote | Modify

le plus simple comme le dit Bubu, c'est de voir le script existant.
Pour le modifier ou  voir ce qu'il contient.
taper CTRL+clic sur le nom du programme. Tout le texte s'affiche.
 
 
-- options pour myrweb
-- Application.WebExportSetup(...)
 
--Description : Opens the setup dialog box for MyrWeb export. The values are automatically recorded in a preference file.
--Parameters : (optional) true if enhanced setup (by default false)
--Return value : Boolean : true if user validated the box.
---Boolean : true if user changed the setup.
--Related methods and values:
 
 
 
 
--Application.GetWebExportSetup(...)
--Description : Provide the parameters describing the MyrWeb export setup as defined in WebExportSetup.
--Parameters : none
--Return value :  
--  String : Advanced setup, all settings separated by ';',for example : playmarker=bar;volume=80;  
--  Boolean : true if the score  will be displayed on the web page (by default the last value defined in WebExportSteup, by default true)
--  Boolean : true if all views will be included, false only main view (by default the last value defined in WebExportSteup, by default true)
--  Boolean : true if lyrics could be displayed in a separate page (as a karaoke) (by default the last value defined in WebExportSteup, by default true)
--  Boolean : true if music could be played (by default the last value defined in WebExportSteup, by default true)
--  Boolean : true if piano keyboard could be displayed (by default the last value defined in WebExportSteup, by default true)
--  Boolean : true if metronome could be played (by default the last value defined in WebExportSteup, by default true)
--  Number : music quality from 0 (low quality, shortest file) to 4 (by default the last value defined in WebExportSteup, high quality , biggest file) (by default 2)
--  Boolean : true if myr file will be embedded (by default the last value defined in WebExportSteup, by default true)
--  Boolean : true if data will be compressed (by default the last value defined in WebExportSteup, by default true)
--  Number : automatic group of staves. On the web page the user can select which group is played. (by default the last value defined in WebExportSteup, by default 0)
--   0 = No automatic group, use  to group the staves in a same audio track.
----   1 = First staff in a track, all others in another track.
--   2 = All staves with lyrics in a track, all others staves in another track.
--   3 = Each staves with lyrics in a separate track, all others staves in another track.
--   4 = Each staves in a separate track.
 
Include "MsDefine"
Include "MSLibrary.mys"
 
Application.WebExportSetup()
------------------------------------------------------------------
function export_mp3_voices_in_score(oneScore, oneFile)
------------------------------------------------------------------
 
  thePath,theName,theExtension=SplitName(fileName)
 
  -- Loop on all staves from score
  ApplyToAllStaves(oneScore,
          function(staff)
      -- if staff has lyrics...  
      if staff.IsLyrics==true then
                   
          staff.VirtualSingerVoice.VolumePlacement = 30
      end
        end
        )
 
   
  -- Loop on all staves from score
  ApplyToAllStaves(oneScore,
          function(staff)
      -- if staff has lyrics...  
      if staff.IsLyrics==true then
       
       print("   Exporting staff : ", staff.Title)
       
       if staff.VirtualSingerVoice.IsActive == true then
        saveVolume = staff.VirtualSingerVoice.VolumePlacement        
           staff.VirtualSingerVoice.VolumePlacement = 127
       
        -- Creating complete file name in the export folder
        theCompleteFileName=thePath.."/myrweb/"..theName.."_"..staff.Title..".my rweb.html"
        --theCompleteFileName=GetUserExportPathName("Music Export")..theName.."_"..staff.Title..".myrweb.html"
        -- Exporting the file
        staff.Score.WebExport(theCompleteFileName,FORMAT_HTML)
         
         print("       voice export successful.")
       
         
        staff.VirtualSingerVoice.VolumePlacement = saveVolume
       end
       
   
      end
        end
        )
     
     -- Loop on all staves from score
     ApplyToAllStaves(oneScore,
          function(staff)
      -- if staff has lyrics...  
      if staff.IsLyrics==true then
                   
          staff.VirtualSingerVoice.VolumePlacement = 127
      end
        end
        )
     
 -- Creating complete file name in the export folder
        theCompleteFileName=thePath.."/myrweb/"..theName.."_tous.myrweb.html"
        --theCompleteFileName=GetUserExportPathName("Music Export")..theName.."_"..staff.Title..".myrweb.html"
     
        print("   Exporting all singers equal")
          -- Exporting the file
        theScore.WebExport(theCompleteFileName,FORMAT_HTML)
         
         print("      score with all singers equal export successful.")
       
     
 
 
end
 
 
 
------------------------------------------------------------------
function export_mp3_voices_in_file(fileName)
------------------------------------------------------------------
 
 -- Load the score from file, without displaying it
 if fileName ~=nil then
  theScore=Load(fileName, false, false, true, false, true)
 end
 
 if theScore ~= nil then
  print("Exporting file : ", fileName, "...")
  export_mp3_voices_in_score(theScore, fileName)
  print("...done")
 end
 
 return true
end
 
 
   
--- Main entry
 
--- This script handles one .myr file  
 
-- Select file name
fileName=GetFileNameLoad("myr")
 
if (fileName ~=nil) then
 
 _lastPath,theName,theExtension=SplitName(fileName)
 
 -- Call export_mp3_voices_in_file(fileName) to export VS voices in fileNAme
 export_mp3_voices_in_file(fileName)
 
end
 
 
---- EOF
« Last Edit: Jan 18th, 2017, 10:45pm by jihel9 » offline

Jean Louis, à Anthisnes (25 Km au sud de Liège)
Harmony Assistant, la dernière version
Win 10, Intel I3-5010U, 8gb, Chrome / Firefox / Edge
francophone (traduction automatique des autres langues)
Pages: 1  Reply | Notify of replies | Print

« Previous topic | Next topic »

« Myriad Forum » Powered by YaBB 1 Gold - SP 1.1!
YaBB © 2000-2002,
Xnull. All Rights Reserved.

Top of page
Legal information Last update:  (c) Myriad