[JScript e XML] Random Gradiator - Script per MSN Messenger

Stato
Discussione chiusa ad ulteriori risposte.

Noixe

Utente Silver
27 Dicembre 2008
0
0
0
55
Questo e' uno script per Messenger Plus! Live che permette di colorare secondo gradazioni casuali i messaggi inviati, il nick name e il messaggio personale.

Il pacchetto da importare lo trovate qui:

http://www.msgpluslive.it/scripts/view/429-Random-Gradiator

Il codice di funzionamento è questo scritto in JScript:

Codice:
Abilitato = "NO";
FORM = 0;
MOD = 0;
LET = 10;
SCELTISTR = "1111111111111100000000000000000000000000000000000000000000000000000";
SM = "SI";
NN = "NO";
PM = "NO";
NNsec = 10;
PMsec = 10;


function Trim(str) {

	while (str.substr(0, 1) == " ")
		str = str.substr(1);
	
	while (str.substr(str.length - 1, 1) == " ")
		str = str.substr(0, str.length - 1);

	return str;

}

function Pulisci(str) {

	codfor = new Array("[a=", "[c=", "[b", "[i", "[u", "[/");
	
	for (i = 0; i < codfor.length; i++) {
		a = 0;
		while (a != -1) {
			a = str.indexOf(codfor[i]);
			if (a != -1) {
				b = str.indexOf("]", a) == -1 ? str.length : str.indexOf("]", a);
				str = str.substr(0, a) + str.substr(b + 1);
			};		
		};
	};
	
	return str;
	
}

function Carica() {

	try {
		Abilitato = new ActiveXObject('WScript.Shell').RegRead(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\Abilitato");
		FORM = new ActiveXObject('WScript.Shell').RegRead(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\FORM");
		MOD = new ActiveXObject('WScript.Shell').RegRead(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\MOD");
		LET = new ActiveXObject('WScript.Shell').RegRead(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\LET");
		SCELTISTR = new ActiveXObject('WScript.Shell').RegRead(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\SCELTISTR");		
		SM = new ActiveXObject('WScript.Shell').RegRead(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\SM");
		NN = new ActiveXObject('WScript.Shell').RegRead(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\NN");
		NNsec = new ActiveXObject('WScript.Shell').RegRead(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\NNsec");
		PM = new ActiveXObject('WScript.Shell').RegRead(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\PM");
		PMsec = new ActiveXObject('WScript.Shell').RegRead(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\PMsec");				
	}
	catch (e) {
		new ActiveXObject('WScript.Shell').RegWrite(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\Abilitato", Abilitato);
		new ActiveXObject('WScript.Shell').RegWrite(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\FORM", FORM);
		new ActiveXObject('WScript.Shell').RegWrite(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\MOD", MOD);
		new ActiveXObject('WScript.Shell').RegWrite(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\LET", LET);
		new ActiveXObject('WScript.Shell').RegWrite(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\SCELTISTR", SCELTISTR);
		new ActiveXObject('WScript.Shell').RegWrite(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\SM", SM);
		new ActiveXObject('WScript.Shell').RegWrite(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\NN", NN);
		new ActiveXObject('WScript.Shell').RegWrite(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\NNsec", NNsec);
		new ActiveXObject('WScript.Shell').RegWrite(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\PM", PM);
		new ActiveXObject('WScript.Shell').RegWrite(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\PMsec", PMsec);
	};
		
	if (Abilitato == "SI") {
		if (NN == "SI") 
			MsgPlus.AddTimer("NickName", NNsec + "000");
			
		if (PM == "SI") 
			MsgPlus.AddTimer("PersonalMessage", PMsec + "000");
	};
		
}

function Gradazione(Messaggio, form, mod, let, sceltistr) {

	Scelti = new Array();
	
	for (i = 0; i < sceltistr.length; i++)
		if (sceltistr.substr(i, 1) == "1")
			Scelti.push(i + 1);
				
	BIU_a = new Array(" ", "[b]", "[i]", "[u]", "[b][i]", "[b][u]", "[i][u]", "[b][i][u]");
	BIU_c = new Array(" ", "[/b]", "[/i]", "[/u]", "[/i][/b]", "[/u][/b]", "[/u][/i]", "[/u][/i][/b]");
				   
	form = form == 8 ? parseInt(Math.random() * form) : form;
	mod = mod == 2 ? parseInt(Math.random() * mod) : mod;
	
	if (mod == 0) {
		c1 = Scelti[parseInt(Math.random() * Scelti.length)];
		c2 = Scelti[parseInt(Math.random() * Scelti.length)];
		msg1 = Messaggio.substr(0, Messaggio.length / 2);
		msg2 = Messaggio.substr(Messaggio.length / 2);
		return BIU_a[form] + "[c=" + c1 + "]" + msg1 + "[/c=" + c2 + "]" + 
					   	 "[c=" + c2 + "]" + msg2 + "[/c=" + c1 + "]" + BIU_c[form];	
	}
	else
	if (mod == 1) {
		lettere = parseInt(let);
		msg = "";
		col1 = Scelti[parseInt(Math.random() * Scelti.length)];
		for (i = 0; i < Messaggio.length; i += lettere) {
			col2 = Scelti[parseInt(Math.random() * Scelti.length)]
			msg += "[c=" + col1 + "]" + Messaggio.substr(i, lettere) + "[/c=" + col2 + "]";
			col1 = col2;
		};
		return BIU_a[form] + msg + BIU_c[form];
	};

}

function OnEvent_Initialize(MessengerStart) {

	if (!MessengerStart)
		Carica();
}

function OnEvent_Signin(Email) {
	
	Carica();
					
}

function OnEvent_Signout(Email) {
	
	Abilitato = "NO";
	FORM = 0;
	MOD = 0;
	LET = 10;
	SCELTISTR = "1111111111111100000000000000000000000000000000000000000000000000000";
	SM = "SI";
	NN = "NO";
	PM = "NO";
	NNsec = 10;
	PMsec = 10;
		
	MsgPlus.CancelTimer("NickName");
	MsgPlus.CancelTimer("PersonalMessage");

}

function OnEvent_ChatWndSendMessage(ChatWnd, Message) {
	
	if ((Message.substr(0, 1) == "!") || (Message.substr(0, 1) == "/") || (Message.indexOf("http://") != -1) || (Message.indexOf("www.") != -1) || (SM != "SI") || (Abilitato != "SI"))
		return Message;
	else
	if (Message.substr(0, 1) == "?")
		return Message.substr(1);
	else 
		return Gradazione(Message, FORM, MOD, LET, SCELTISTR);
	
}

function OnGetScriptMenu(Location) {

	ScriptMenu = "<ScriptMenu>";
	ScriptMenu += "<MenuEntry Id = \"Opzioni\">Options</MenuEntry>";
	ScriptMenu += "</ScriptMenu>";
	return ScriptMenu;
	
}

function OnEvent_MenuClicked(MenuId) {

	if (MenuId == "Opzioni") {
		Wnd = MsgPlus.CreateWnd("Gui.xml", "Options");
		
		Wnd.Combo_AddItem("Formattazione", "Simple text");
		Wnd.Combo_AddItem("Formattazione", "Bold");
		Wnd.Combo_AddItem("Formattazione", "Italic");
		Wnd.Combo_AddItem("Formattazione", "Underline");
		Wnd.Combo_AddItem("Formattazione", "Bold-Italic");
		Wnd.Combo_AddItem("Formattazione", "Bold-Underline");
		Wnd.Combo_AddItem("Formattazione", "Italic-Underline");
		Wnd.Combo_AddItem("Formattazione", "Bold-Italic-Underline");
		Wnd.Combo_AddItem("Formattazione", "Random");
		Wnd.Combo_SetCurSel("Formattazione", FORM);
		
		Wnd.Combo_AddItem("Modalita", "Bidirectional gradation");
		Wnd.Combo_AddItem("Modalita", "Multigradation");
		Wnd.Combo_AddItem("Modalita", "Random");
		Wnd.Combo_SetCurSel("Modalita", MOD);
			
		for (i = 1; i <= 30; i++)
			Wnd.Combo_AddItem("Lettere", i);
		Wnd.Combo_SetCurSel("Lettere", LET - 1);
		
		Interop.Call("user32", "EnableWindow", Wnd.GetControlHandle("Lettere"), MOD != 0);
		
		for (i = 0; i < SCELTISTR.length; i++)
			Wnd.Button_SetCheckState("C" + parseInt(i + 1), SCELTISTR.substr(i, 1) == "1" ? true : false);
		
		Wnd.Button_SetCheckState("SM", SM == "SI" ? true : false);
		
		Wnd.Button_SetCheckState("NN", NN == "SI" ? true : false);
		
		for (i = 10; i <= 60; i++)
			Wnd.Combo_AddItem("NNsec", i);
		Wnd.Combo_SetCurSel("NNsec", NNsec - 10);
			
		Wnd.Button_SetCheckState("PM", PM == "SI" ? true : false);
		
		for (i = 10; i <= 60; i++)
			Wnd.Combo_AddItem("PMsec", i);
		Wnd.Combo_SetCurSel("PMsec", PMsec - 10);
	}	
	
}

function OnOptionsEvent_CtrlClicked(Wnd, ControlId) {

	if (ControlId == "Anteprima") {
		pFORM = Wnd.Combo_GetCurSel("Formattazione");
		pMOD = Wnd.Combo_GetCurSel("Modalita");
		pLET = Wnd.Combo_GetCurSel("Lettere") + 1;	
		pSCELTISTR = "";
		
		for (i = 0; i < 67; i++)
			pSCELTISTR += Wnd.Button_IsChecked("C" + parseInt(i + 1)) ? "1" : "0";
	
		Wnd.SetControlText("LAnteprima", Gradazione("Click on the Preview button to see the effects of gradation", pFORM, pMOD, pLET, pSCELTISTR));
	}
	else
	if (ControlId == "OK") {
		BIU = new Array("Simple text", "Bold", "Italic", "Underline",
	                     "Bold-Italic", "Bold-Underline", "Italic-Underline",
	                     "Bold-Italic-Underline", "Random");
	     
	     M = new Array("Bidirectional gradation", "Multigradation", "Random");
		
		Abilitato = "SI";
		new ActiveXObject('WScript.Shell').RegWrite(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\Abilitato", Abilitato);
		
		FORM = Wnd.Combo_GetCurSel("Formattazione");
		new ActiveXObject('WScript.Shell').RegWrite(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\FORM", FORM);
		
		MOD = Wnd.Combo_GetCurSel("Modalita");
		new ActiveXObject('WScript.Shell').RegWrite(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\MOD", MOD);
		
		LET = Wnd.Combo_GetCurSel("Lettere") + 1;
		new ActiveXObject('WScript.Shell').RegWrite(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\LET", LET);
		
		SCELTISTR = "";
				
		for (i = 0; i < 67; i++)
			SCELTISTR += Wnd.Button_IsChecked("C" + parseInt(i + 1)) ? "1" : "0";
		new ActiveXObject('WScript.Shell').RegWrite(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\SCELTISTR", SCELTISTR);
		
		SM = Wnd.Button_IsChecked("SM") ? "SI" : "NO";
		new ActiveXObject('WScript.Shell').RegWrite(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\SM", SM);
		
		NN = Wnd.Button_IsChecked("NN") ? "SI" : "NO";
		new ActiveXObject('WScript.Shell').RegWrite(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\NN", NN);
		
		NNsec = Wnd.Combo_GetCurSel ("NNsec") + 10;
		new ActiveXObject('WScript.Shell').RegWrite(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\NNsec", NNsec);
		
		PM = Wnd.Button_IsChecked("PM") ? "SI" : "NO";
		new ActiveXObject('WScript.Shell').RegWrite(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\PM", PM);
		
		PMsec = Wnd.Combo_GetCurSel ("PMsec") + 10;
		new ActiveXObject('WScript.Shell').RegWrite(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\PMsec", PMsec);
					
		MsgPlus.DisplayToast("Random Gradiator", "Text format: " + BIU[FORM] + "\nMode: " + M[MOD] + "\nCharacters for gradation: " + LET);
		
		ToastMsg = "";	
		
		if (SM == "SI")
			ToastMsg = "\nSent Messages";
		
		if (NN == "SI") {
			MsgPlus.AddTimer("NickName", NNsec + "000");
			ToastMsg += "\nNick Name every: " + NNsec + " seconds";
		}
		else
			MsgPlus.CancelTimer("NickName");
			
		if (PM == "SI") {
			MsgPlus.AddTimer("PersonalMessage", PMsec + "000");
			ToastMsg += "\nPersonal Message every: " + PMsec + " seconds";
		}
		else
			MsgPlus.CancelTimer("PersonalMessage");
		
		if (ToastMsg != "")
			MsgPlus.DisplayToast("Random Gradiator", "Gradation applied at:" + ToastMsg);
		
		Wnd.Close(1);
	}
	else
	if (ControlId == "Annulla") 
		Wnd.Close(1);
	else
	if (ControlId == "Disabilita") {
		if (NN == "SI")
			Messenger.MyName = Trim(Pulisci(MsgPlus.RemoveFormatCodes(Messenger.MyName)));
		if (PM == "SI")
			Messenger.MyPersonalMessage = Trim(Pulisci(MsgPlus.RemoveFormatCodes(Messenger.MyPersonalMessage)));
		Abilitato = "NO";
		new ActiveXObject('WScript.Shell').RegWrite(MsgPlus.ScriptRegPath + Messenger.MyEmail + "\\Abilitato", Abilitato);
		MsgPlus.CancelTimer("NickName");
		MsgPlus.CancelTimer("PersonalMessage");
		MsgPlus.DisplayToast("Random Gradiator", "Random Gradiator disabled");
		Wnd.Close(1);
	};

}

function OnOptionsEvent_ComboSelChanged() {

	Interop.Call("user32", "EnableWindow", Wnd.GetControlHandle("Lettere"), Wnd.Combo_GetCurSel("Modalita") != 0);

}

function OnEvent_Timer(TimerId) {

	if (TimerId == "NickName") {
		Messenger.MyName = Gradazione(Trim(Pulisci(MsgPlus.RemoveFormatCodes(Messenger.MyName))), FORM, MOD, LET, SCELTISTR);
		MsgPlus.AddTimer("NickName", NNsec + "000");
	};
	
	if ((TimerId == "PersonalMessage") && (Messenger.MyPersonalMessage != "")) {
		Messenger.MyPersonalMessage = Gradazione(Trim(Pulisci(MsgPlus.RemoveFormatCodes(Messenger.MyPersonalMessage))), FORM, MOD, LET, SCELTISTR);
		MsgPlus.AddTimer("PersonalMessage", PMsec + "000");
	};

}

Mentre la Gui è scritta in XML:

Codice:
<Interfaces xmlns:xsi = "http://www.w3.org/2001/XMLSchema-instance">

	<Window Id = "Options" Version = "1">
	
		<Attributes>
			<Caption>Random Gradiator</Caption>
		</Attributes>
		
		<TitleBar>
			<Title><Text>Options</Text></Title>
			<AllowMinimize>false</AllowMinimize>
			<AllowClose>false</AllowClose>
		</TitleBar>

		<Position Width = "275" Height = "350"/>
		<DialogTmpl/>
		
		<Controls>
	
			<Control xsi:type = "StaticControl" Id = "Title">
				<Position Top = "0" Left = "70" Height = "40" Width = "240"/>
				<Font><Size>14</Size></Font>
				<Caption>Random Gradiator 2.8</Caption>
			</Control>
			
			<Control xsi:type = "StaticControl" Id = "Text">
				<Position Top = "17" Left = "70" Height = "120" Width = "330"/>
				<Caption>© Lord Axeryon ([email protected])</Caption>
			</Control>

		
			<Control xsi:type = "StaticControl" Id = "Formato">
				<Position Top = "34" Left = "5" Height = "100" Width = "330"/>
				<Font><Size>13</Size></Font>
				<Caption>Text format</Caption>
			</Control>

			<Control xsi:type = "ComboBoxControl" Id = "Formattazione">
				<Position Top = "50" Width = "100" Left = "5"/>
			</Control>


			<Control xsi:type = "StaticControl" Id = "Tipo">
				<Position Top = "34" Left = "155" Height = "100" Width = "330"/>
				<Font><Size>13</Size></Font>
				<Caption>Gradation mode</Caption>
			</Control>

			<Control xsi:type = "ComboBoxControl" Id = "Modalita">
   				<Position Top = "50" Width = "100" Left = "155"/>
			</Control>


			<Control xsi:type = "StaticControl" Id = "Let">
				<Position Top = "68" Left = "5" Height = "100" Width = "330"/>
				<Font><Size>10</Size></Font>
				<Caption>Characters for gradation</Caption>
			</Control>

			<Control xsi:type = "ComboBoxControl" Id = "Lettere">
				 <Position Top = "82" Width = "30" Left = "5"/>
			</Control>

				
		
			<Control xsi:type = "StaticControl" Id = "SceltaColori">
				<Position Top = "104" Left = "5" Height = "100" Width = "330"/>
				<Font><Size>13</Size></Font>
				<Caption>Colors available</Caption>
			</Control>



			<Control xsi:type = "CheckBoxControl" Id = "C1">
				<Position Top = "120" Left = "5" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L1">
				<Position Top = "120" Left = "15" Height = "10" Width = "15"/>
				<Caption>·$1 1</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C2">
				<Position Top = "120" Left = "31" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L2">
				<Position Top = "120" Left = "41" Height = "10" Width = "15"/>
				<Caption>·$2 2</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C3">
				<Position Top = "120" Left = "57" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L3">
				<Position Top = "120" Left = "67" Height = "10" Width = "15"/>
				<Caption>·$3 3</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C4">
				<Position Top = "120" Left = "83" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L4">
				<Position Top = "120" Left = "93" Height = "10" Width = "15"/>
				<Caption>·$4 4</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C5">
				<Position Top = "120" Left = "109" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L5">
				<Position Top = "120" Left = "119" Height = "10" Width = "15"/>
				<Caption>·$5 5</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C6">
				<Position Top = "120" Left = "135" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L6">
				<Position Top = "120" Left = "145" Height = "10" Width = "15"/>
				<Caption>·$6 6</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C7">
				<Position Top = "120" Left = "161" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L7">
				<Position Top = "120" Left = "171" Height = "10" Width = "15"/>
				<Caption>·$7 7</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C8">
				<Position Top = "120" Left = "187" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L8">
				<Position Top = "120" Left = "197" Height = "10" Width = "15"/>
				<Caption>·$8 8</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C9">
				<Position Top = "120" Left = "213" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L9">
				<Position Top = "120" Left = "223" Height = "10" Width = "15"/>
				<Caption>·$9 9</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C10">
				<Position Top = "120" Left = "239" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L10">
				<Position Top = "120" Left = "249" Height = "10" Width = "15"/>
				<Caption>·$10 10</Caption>
			</Control>



			<Control xsi:type = "CheckBoxControl" Id = "C11">
				<Position Top = "130" Left = "5" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L11">
				<Position Top = "130" Left = "15" Height = "10" Width = "15"/>
				<Caption>·$11 11</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C12">
				<Position Top = "130" Left = "31" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L12">
				<Position Top = "130" Left = "41" Height = "10" Width = "15"/>
				<Caption>·$12 12</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C13">
				<Position Top = "130" Left = "57" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L13">
				<Position Top = "130" Left = "67" Height = "10" Width = "15"/>
				<Caption>·$13 13</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C14">
				<Position Top = "130" Left = "83" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L14">
				<Position Top = "130" Left = "93" Height = "10" Width = "15"/>
				<Caption>·$14 14</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C15">
				<Position Top = "130" Left = "109" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L15">
				<Position Top = "130" Left = "119" Height = "10" Width = "15"/>
				<Caption>·$15 15</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C16">
				<Position Top = "130" Left = "135" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L16">
				<Position Top = "130" Left = "145" Height = "10" Width = "15"/>
				<Caption>·$16 16</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C17">
				<Position Top = "130" Left = "161" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L17">
				<Position Top = "130" Left = "171" Height = "10" Width = "15"/>
				<Caption>·$17 17</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C18">
				<Position Top = "130" Left = "187" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L18">
				<Position Top = "130" Left = "197" Height = "10" Width = "15"/>
				<Caption>·$18 18</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C19">
				<Position Top = "130" Left = "213" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L19">
				<Position Top = "130" Left = "223" Height = "10" Width = "15"/>
				<Caption>·$19 19</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C20">
				<Position Top = "130" Left = "239" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L20">
				<Position Top = "130" Left = "249" Height = "10" Width = "15"/>
				<Caption>·$20 20</Caption>
			</Control>
			


			<Control xsi:type = "CheckBoxControl" Id = "C21">
				<Position Top = "140" Left = "5" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L21">
				<Position Top = "140" Left = "15" Height = "10" Width = "15"/>
				<Caption>·$21 21</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C22">
				<Position Top = "140" Left = "31" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L22">
				<Position Top = "140" Left = "41" Height = "10" Width = "15"/>
				<Caption>·$22 22</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C23">
				<Position Top = "140" Left = "57" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L23">
				<Position Top = "140" Left = "67" Height = "10" Width = "15"/>
				<Caption>·$23 23</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C24">
				<Position Top = "140" Left = "83" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L24">
				<Position Top = "140" Left = "93" Height = "10" Width = "15"/>
				<Caption>·$24 24</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C25">
				<Position Top = "140" Left = "109" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L25">
				<Position Top = "140" Left = "119" Height = "10" Width = "15"/>
				<Caption>·$25 25</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C26">
				<Position Top = "140" Left = "135" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L26">
				<Position Top = "140" Left = "145" Height = "10" Width = "15"/>
				<Caption>·$26 26</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C27">
				<Position Top = "140" Left = "161" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L27">
				<Position Top = "140" Left = "171" Height = "10" Width = "15"/>
				<Caption>·$27 27</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C28">
				<Position Top = "140" Left = "187" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L28">
				<Position Top = "140" Left = "197" Height = "10" Width = "15"/>
				<Caption>·$28 28</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C29">
				<Position Top = "140" Left = "213" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L29">
				<Position Top = "140" Left = "223" Height = "10" Width = "15"/>
				<Caption>·$29 29</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C30">
				<Position Top = "140" Left = "239" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L30">
				<Position Top = "140" Left = "249" Height = "10" Width = "15"/>
				<Caption>·$30 30</Caption>
			</Control>
			

			
			<Control xsi:type = "CheckBoxControl" Id = "C31">
				<Position Top = "150" Left = "5" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L31">
				<Position Top = "150" Left = "15" Height = "10" Width = "15"/>
				<Caption>·$31 31</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C32">
				<Position Top = "150" Left = "31" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L32">
				<Position Top = "150" Left = "41" Height = "10" Width = "15"/>
				<Caption>·$32 32</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C33">
				<Position Top = "150" Left = "57" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L33">
				<Position Top = "150" Left = "67" Height = "10" Width = "15"/>
				<Caption>·$33 33</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C34">
				<Position Top = "150" Left = "83" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L34">
				<Position Top = "150" Left = "93" Height = "10" Width = "15"/>
				<Caption>·$34 34</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C35">
				<Position Top = "150" Left = "109" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L35">
				<Position Top = "150" Left = "119" Height = "10" Width = "15"/>
				<Caption>·$35 35</Caption>
			</Control>
			
			<Control xsi:type = "CheckBoxControl" Id = "C36">
				<Position Top = "150" Left = "135" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L36">
				<Position Top = "150" Left = "145" Height = "10" Width = "15"/>
				<Caption>·$36 36</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C37">
				<Position Top = "150" Left = "161" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L37">
				<Position Top = "150" Left = "171" Height = "10" Width = "15"/>
				<Caption>·$37 37</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C38">
				<Position Top = "150" Left = "187" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L38">
				<Position Top = "150" Left = "197" Height = "10" Width = "15"/>
				<Caption>·$38 38</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C39">
				<Position Top = "150" Left = "213" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L39">
				<Position Top = "150" Left = "223" Height = "10" Width = "15"/>
				<Caption>·$39 39</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C40">
				<Position Top = "150" Left = "239" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L40">
				<Position Top = "150" Left = "249" Height = "10" Width = "15"/>
				<Caption>·$40 40</Caption>
			</Control>
			


			<Control xsi:type = "CheckBoxControl" Id = "C41">
				<Position Top = "160" Left = "5" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L41">
				<Position Top = "160" Left = "15" Height = "10" Width = "15"/>
				<Caption>·$41 41</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C42">
				<Position Top = "160" Left = "31" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L42">
				<Position Top = "160" Left = "41" Height = "10" Width = "15"/>
				<Caption>·$42 42</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C43">
				<Position Top = "160" Left = "57" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L43">
				<Position Top = "160" Left = "67" Height = "10" Width = "15"/>
				<Caption>·$43 43</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C44">
				<Position Top = "160" Left = "83" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L44">
				<Position Top = "160" Left = "93" Height = "10" Width = "15"/>
				<Caption>·$44 44</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C45">
				<Position Top = "160" Left = "109" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L45">
				<Position Top = "160" Left = "119" Height = "10" Width = "15"/>
				<Caption>·$45 45</Caption>
			</Control>
			
			<Control xsi:type = "CheckBoxControl" Id = "C46">
				<Position Top = "160" Left = "135" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L46">
				<Position Top = "160" Left = "145" Height = "10" Width = "15"/>
				<Caption>·$46 46</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C47">
				<Position Top = "160" Left = "161" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L47">
				<Position Top = "160" Left = "171" Height = "10" Width = "15"/>
				<Caption>·$47 47</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C48">
				<Position Top = "160" Left = "187" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L48">
				<Position Top = "160" Left = "197" Height = "10" Width = "15"/>
				<Caption>·$48 48</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C49">
				<Position Top = "160" Left = "213" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L49">
				<Position Top = "160" Left = "223" Height = "10" Width = "15"/>
				<Caption>·$49 49</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C50">
				<Position Top = "160" Left = "239" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L50">
				<Position Top = "160" Left = "249" Height = "10" Width = "15"/>
				<Caption>·$50 50</Caption>
			</Control>



			<Control xsi:type = "CheckBoxControl" Id = "C51">
				<Position Top = "170" Left = "5" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L51">
				<Position Top = "170" Left = "15" Height = "10" Width = "15"/>
				<Caption>·$51 51</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C52">
				<Position Top = "170" Left = "31" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L52">
				<Position Top = "170" Left = "41" Height = "10" Width = "15"/>
				<Caption>·$52 52</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C53">
				<Position Top = "170" Left = "57" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L53">
				<Position Top = "170" Left = "67" Height = "10" Width = "15"/>
				<Caption>·$53 53</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C54">
				<Position Top = "170" Left = "83" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L54">
				<Position Top = "170" Left = "93" Height = "10" Width = "15"/>
				<Caption>·$54 54</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C55">
				<Position Top = "170" Left = "109" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L55">
				<Position Top = "170" Left = "119" Height = "10" Width = "15"/>
				<Caption>·$55 55</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C56">
				<Position Top = "170" Left = "135" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L56">
				<Position Top = "170" Left = "145" Height = "10" Width = "15"/>
				<Caption>·$56 56</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C57">
				<Position Top = "170" Left = "161" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L57">
				<Position Top = "170" Left = "171" Height = "10" Width = "15"/>
				<Caption>·$57 57</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C58">
				<Position Top = "170" Left = "187" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L58">
				<Position Top = "170" Left = "197" Height = "10" Width = "15"/>
				<Caption>·$58 58</Caption>
			</Control>
			
			<Control xsi:type = "CheckBoxControl" Id = "C59">
				<Position Top = "170" Left = "213" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L59">
				<Position Top = "170" Left = "223" Height = "10" Width = "15"/>
				<Caption>·$59 59</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C60">
				<Position Top = "170" Left = "239" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L60">
				<Position Top = "170" Left = "249" Height = "10" Width = "15"/>
				<Caption>·$60 60</Caption>
			</Control>



			<Control xsi:type = "CheckBoxControl" Id = "C61">
				<Position Top = "180" Left = "5" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L61">
				<Position Top = "180" Left = "15" Height = "10" Width = "15"/>
				<Caption>·$61 61</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C62">
				<Position Top = "180" Left = "31" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L62">
				<Position Top = "180" Left = "41" Height = "10" Width = "15"/>
				<Caption>·$62 62</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C63">
				<Position Top = "180" Left = "57" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L63">
				<Position Top = "180" Left = "67" Height = "10" Width = "15"/>
				<Caption>·$63 63</Caption>
			</Control>
			
			<Control xsi:type = "CheckBoxControl" Id = "C64">
				<Position Top = "180" Left = "83" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L64">
				<Position Top = "180" Left = "93" Height = "10" Width = "15"/>
				<Caption>·$64 64</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C65">
				<Position Top = "180" Left = "109" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L65">
				<Position Top = "180" Left = "119" Height = "10" Width = "15"/>
				<Caption>·$65 65</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C66">
				<Position Top = "180" Left = "135" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L66">
				<Position Top = "180" Left = "145" Height = "10" Width = "15"/>
				<Caption>·$66 66</Caption>
			</Control>

			<Control xsi:type = "CheckBoxControl" Id = "C67">
				<Position Top = "180" Left = "161" Height = "10" Width = "10"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "L67">
				<Position Top = "180" Left = "171" Height = "10" Width = "15"/>
				<Caption>·$67 67</Caption>
			</Control>



			<Control xsi:type = "RichStaticControl" Id = "LAnteprima">
				<Position Top = "200" Left = "5" Height = "10" Width = "220"/>
				<Caption>Click on the Preview button to see the effects of gradation</Caption>
			</Control>
			<Control xsi:type = "ButtonControl" Id = "Anteprima">
				<Position Top = "212" Left = "5" Width = "33"/>
				<Caption>Preview</Caption>
			</Control>



			<Control xsi:type = "StaticControl" Id = "Applica">
				<Position Top = "235" Left = "5" Height = "100" Width = "110"/>
				<Font><Size>13</Size></Font>
				<Caption>Apply gradation at:</Caption>
			</Control>

			
			<Control xsi:type = "CheckBoxControl" Id = "SM">
				<Position Top = "251" Left = "5" Height = "10" Width = "10"/>
			</Control>
			
			<Control xsi:type = "RichStaticControl" Id = "LSM">
				<Position Top = "251" Left = "15" Height = "10" Width = "100"/>
				<Caption>Sent Messages</Caption>
			</Control>


			
			<Control xsi:type = "CheckBoxControl" Id = "NN">
				<Position Top = "267" Left = "5" Height = "10" Width = "10"/>
			</Control>
			
			<Control xsi:type = "RichStaticControl" Id = "LNN">
				<Position Top = "267" Left = "15" Height = "10" Width = "100"/>
				<Caption>Nick Name and change every</Caption>
			</Control>

			<Control xsi:type = "ComboBoxControl" Id = "NNsec">
				 <Position Top = "264" Width = "30" Left = "112"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "LNNsec">
				<Position Top = "267" Left = "144" Height = "10" Width = "80"/>
				<Caption>seconds</Caption>
			</Control>

			
			
			<Control xsi:type = "CheckBoxControl" Id = "PM">
				<Position Top = "283" Left = "5" Height = "10" Width = "10"/>
			</Control>
			
			<Control xsi:type = "RichStaticControl" Id = "LPM">
				<Position Top = "283" Left = "15" Height = "10" Width = "120"/>
				<Caption>Personal Message and change every</Caption>
			</Control>

			<Control xsi:type = "ComboBoxControl" Id = "PMsec">
				 <Position Top = "280" Width = "30" Left = "137"/>
			</Control>

			<Control xsi:type = "RichStaticControl" Id = "LPMsec">
				<Position Top = "283" Left = "169" Height = "10" Width = "80"/>
				<Caption>seconds</Caption>
			</Control>
			

			<Control xsi:type = "ButtonControl" Id = "OK">
				<Position Top = "300" Left = "5" Width = "30"/>
				<Caption>OK</Caption>
			</Control>

	                <Control xsi:type = "ButtonControl" Id = "Annulla">
        	        	<Position Top = "300" Left = "35" Width = "30"/>
				<Caption>Cancel</Caption>
			</Control>

	                <Control xsi:type = "ButtonControl" Id = "Disabilita">
				<Position Top = "300" Left = "65" Width = "32"/>
				<Caption>Disable</Caption> 
			</Control>

			<Control xsi:type = "StaticControl" Id = "Nota">
				<Position Top = "300" Left = "105" Height = "120" Width = "330"/>
				<Caption>To disable temporarily the script you must insert\nthe symbol ? before the text message</Caption>
			</Control>

		</Controls>
	
	</Window>
		
</Interfaces>
 
Stato
Discussione chiusa ad ulteriori risposte.