#

Listato 8

Creazione dei pulsanti per i menu di testo
 
<!--
DVD authoring suite
maketextbutton.wsf
(c) copyright 2005-2009 Roberto Ceccarelli
-->

<job>
<runtime>
<named name="filename" helpstring="Il nomefile del bottone" required="true" type="string" />
<named name="iconfile" helpstring="Il file con l'icona del bottone" required="true" type="string" />
<named name="buttontext" helpstring="Il testo da rappresentare" required="true" type="string" />
<named name="font" helpstring="Eventuale tipo di carattere (default: verdana)" required="false" type="string" />
<named name="pointsize" helpstring="Eventuale dimensione del carattere (default: 30)" required="false" type="string" />
<named name="color" helpstring="Eventuale colore del carattere (default: white)" required="false" type="string" />
<named name="maskcolor" helpstring="Eventuale colore della maschera (default: green)" required="false" type="string" />
</runtime>

<script language="JScript">
// dichiarazione variabili
var filename, iconfile, buttontext;
var im;
var font,pointsize,color,maskcolor;

// controllo che esista l'argomento principale
if( !WScript.Arguments.Named.Exists("filename") || !WScript.Arguments.Named.Exists("iconfile") || !WScript.Arguments.Named.Exists("buttontext") )
{
        WScript.Arguments.ShowUsage();
        WScript.Quit();
}
filename = WScript.Arguments.Named("filename");
iconfile = WScript.Arguments.Named("iconfile");
buttontext = WScript.Arguments.Named("buttontext");
if( WScript.Arguments.Named.Exists("font") )
{
        font = WScript.Arguments.Named("font");
}
else  
{
        font = "verdanab.ttf";
}
if( WScript.Arguments.Named.Exists("pointsize") )
{
        pointsize = WScript.Arguments.Named("pointsize");
}
else  
{
        pointsize = "30";
}
if( WScript.Arguments.Named.Exists("color") )
{
        color = WScript.Arguments.Named("color");
}
else  
{
        color = "white";
}
if( WScript.Arguments.Named.Exists("maskcolor") )
{
        maskcolor = WScript.Arguments.Named("maskcolor");
}
else  
{
        maskcolor = "green";
}

im = WScript.CreateObject("ImageMagickObject.MagickImage.1");

im.Convert("xc:transparent","-resize","610X74!",iconfile,"-geometry","+5+5","-composite","-font",font,"-pointsize",pointsize,"-draw","gravity west stroke black fill " +color+" text 75,0 '"+buttontext+"'",filename+".png")
im.Convert("xc:transparent","-resize","610X74!","-font",font,"-pointsize",pointsize,"+antialias","-draw","gravity west fill " +maskcolor+" text 75,0 '"+buttontext+"'","png8:"+filename+"_mask.png")

</script>
</job>
Inizio pagina
Home page
 
Creative Commons  License BY-NC-SA
Ove non diversamente specificato i contenuti del sito sono rilasciati con licenza Creative Commons BY-NC-SA 4.0 

Copyright © 2007-2020 The Strawberry Field - Roberto Ceccarelli