NoteWorthy Composer Forum

• Open Notepad at the same time as you have NWC open.
• Select and cut (Cntl+X) the measure you need to insert something.
• Alt+Tab to get to Notepad.
• Paste (Alt+V) into Notepad.
• Insert your entity after the first line.  Do Cntl+A followed by Cntl+X.
• Alt+Tab to get to NWC.
• Cntl+V to insert it back into your NWC file.

<?php /* simple insert demo
Ref: https://forum.noteworthycomposer.com/?topic=8312.0
Command line option:
	<PROMPT:Enter a line of clip text:=*>
Recommended NWC Options: 
	[X] File Text
*/ 
require_once('lib/nwc2clips.inc');
$startfiletxt = array(NWC2_STARTFILETXT, ')'); // search
$startclip = array(NWC2_STARTCLIP, ',Single)'); // replace
foreach (gzfile('php://stdin') as $ln) {
	$ln = str_replace($startfiletxt, $startclip, $ln, $count);
	if ($count == 2) break;
}
$clip = new NWC2Clip(array($ln, NWC2_ENDCLIP));

echo $clip->GetClipHeader(), PHP_EOL;
if ($argc) echo $argv[1], PHP_EOL;
echo $clip->GetClipFooter(), PHP_EOL;
?>

|Text|Text:"text test"|Font:StaffItalic|Pos:3|Wide:N|Justify:Left|Placement:BestFit|Color:0|Visibility:Default

!NoteWorthyComposerClip(2.5,Single)
|Note|Dur:4th,Grace|Pos:-6^|Visibility:Never
|Note|Dur:4th,Grace|Pos:b-4^|Visibility:Never
|Note|Dur:4th,Grace|Pos:-2^|Visibility:Never
|Chord|Dur:Whole|Pos:-6,-4,-2,1
!NoteWorthyComposerClip-End

[Developer Tools]
About Starter Kit (nwsw)=2,php\php.exe scripts\nwsw_About.php
nwctxt Clip Explorer (nwsw)=18,php\php.exe scripts\nwsw_nwctxtFileExplorer.wxphp
nwctxt File Explorer (nwsw)=31,php\php.exe scripts\nwsw_nwctxtFileExplorer.wxphp
Variable Dump for Developers (nwsw)=2,php\php.exe scripts\nwsw_VarDump.php
PHP Class Explorer (nwsw)=18,php\php.exe scripts\nwsw_phpClassExplorer.wxphp
Simple PHP File Editor (nwsw)=18,php\php.exe scripts\wxtools\nwsw_SimpleEditor.wxphp
Encode File (nwsw)=18,php\php.exe scripts\wxtools\nwsw_EncodeFile.wxphp
Test WBP=18,wscript scripts\rg_graceacc.js

• What is the number just to the right of the =sign? Clip Explorer and File Explorer are identical except for this.
• When running scripts, is there a way to display things immediately (like alert("error")?

var WshShell = WScript.CreateObject("WScript.Shell");
WshShell.Popup("error");

$threenotes="Clef|Type:Treble\n". "|Note|Dur:4th|Pos:1\n" .  "|Note|Dur:4th|Pos:1\n"  . "|Note|Dur:4th|Pos:1\n" ;

$MidiPlayer->playnwctxt($threenotes);

<?php
# rg_Play.php ver 1.0
# Ref: http://my.noteworthysoftware.com/?topic=8312.0
require_once('lib/nwc2clips.inc');
$wso = new COM('WScript.Shell');
$a = array('|Clef|Type:Alto', '|Note', '|Note|Pos:2', '|Note|Dur:Whole|Pos:3');
$clip = new NWC2Clip();
$list = array($a, $clip->Items);
$opt = -1;
while (isset($list[++$opt])) {
	$control = Play($list[$opt]);
	switch ($wso->Popup('Repeat?', 0, $argv[0], 35)) {
		case 2: $opt = -10; // Cancel
		case 6: $opt--; // Yes
	}
	unset($control); // stops playback and releases file
}
$stat = fstat(STDOUT); if ($stat['size']) exit(NWC2RC_REPORT);

function Play($items) {
	$opt = array('bypass_shell' => true);
	$cmd = array('nwc-conv', 'NWCTXT', sys_get_temp_dir().'_rg_.mid');
	if (!is_file($cmd[2])) register_shutdown_function('unlink', $cmd[2]);
	rewind(STDIN); // aka 'php://stdin'
	preg_match('/\d+\.\d+/', current(preg_grep('/^!/', gzfile('php://stdin'))), $m);
	fwrite($h = tmpfile(), NWC2_STARTFILETXT.'('.$m[0].')'.PHP_EOL); // header
	fwrite($h, join(PHP_EOL, $items));
	fwrite($h, NWC2_STARTFILETXT.PHP_EOL); rewind($h); // footer

	proc_open(join(' ', $cmd), array($h), $x, null, null, $opt);
	$wmp = new COM('WMPlayer.ocx');
	$wmp->URL = $cmd[2];
	return $wmp;
}
?>