View difference between Paste ID: rgVhNFXq and 1whKdN8a

 void msg(string m) { //debug console
 	ShowConsoleMsg(m.c_str()); //string
 	ShowConsoleMsg("\n"); //newline
 }
 
 void main() {
-	// define stuff at the top to make it easier for lambda functions
+
 	MediaItem_Take* active_take;
 	int total_sm;
 	double take_start_offset, take_playrate, item_pos, item_length;
 
 	auto create_sm = [&](size_t idx) {
-	// lambda functions
+
-	function<void(size_t)> create_sm = [&](size_t idx) { //use item_pos, item_playrate, item length, source_pos to get ruler positions of SM
+		double stored_ecp = GetCursorPosition();
 		SetEditCurPos(ruler_pos, 0, 0);
-		double stored_ecp = GetCursorPosition();	//store cursor
+
-		SetEditCurPos(ruler_pos, 0, 0);	//move cursor to ruler-time S-pos
+		Main_OnCommandEx(41842, 0, 0);
-		// create SM(blank default, using S, S for P and no slope)
+		SetEditCurPos(stored_ecp, 0, 0);
-		Main_OnCommandEx(41842, 0, 0); //create SM at edit cursor
+
-		SetEditCurPos(stored_ecp, 0, 0); //restore cursor
+
 	ts ={ 0.1, 0.2, 0.3, 0.4, 0.5, 0.6, 0.7, 0.8, 0.9 };
 	tr ={ 0.97, 1.0, 0.99, 0.98, 1.0, 1.03, 1.07, 1.05, 0.98 };
-	function<void(size_t)> modify_sm = [&](size_t idx) {
+
-		//write to SM(idx) calculated P
+	size_t num_ts = ts.size();
-		int retval = SetTakeStretchMarker(active_take, idx, tp[idx], nullptr); //sets P point, no slope yet
+
-		// write slope to SM slope
+	tro.resize(num_ts+2);
-		retval = SetTakeStretchMarkerSlope(active_take, idx, slope[idx]);  //write corrected slopes
+	slope.resize(num_ts+2);
 	tp.resize(num_ts+2);
 	tdss.resize(num_ts+2);
-	ts ={ 0.1, 0.2, 0.3, 0.4, 0.5, 0.6, 0.7, 0.8, 0.9 }; // 1-based, SM S-pos table
+	tdpp.resize(num_ts+2);
-	tr ={ 0.97, 1.0, 0.99, 0.98, 1.0, 1.03, 1.07, 1.05, 0.98 }; // 1-based, SM rate table
+
-	size_t num_ts = ts.size(); // length of array as input above, +1 to handle 1-based table, +1 for end anchor
+	ts.insert(ts.begin(), 0.0);
-	// check #ts == #tp at this point?
+	tr.insert(tr.begin(), 0.0);
-	tro.resize(num_ts+2); //SM ro table
+
-	slope.resize(num_ts+2); //SM slope table
+	Undo_BeginBlock();
-	tp.resize(num_ts+2); //SM P-pos table
+
-	tdss.resize(num_ts+2); //SM ΔSS table
+	MediaItem* sel_item = GetSelectedMediaItem(0, 0);
-	tdpp.resize(num_ts+2); //SM ΔPP table
+
-
+	if (sel_item == nullptr) { msg("No selected item"); return; }
-	ts.insert(ts.begin(), 0); // make one more index to deal with 1-based arrays
+
-	tr.insert(tr.begin(), 0);
+	active_take = GetActiveTake(sel_item);
-	ts.push_back(0.0); // add one more index to hold the end anchor
+
-	tr.push_back(0.0);
+	if (GetTakeNumStretchMarkers(active_take)) { msg("SM already exist"); return; }
 
-	Undo_BeginBlock(); //Hold undo block to all of proj altering code...
+	item_pos = GetMediaItemInfo_Value(sel_item, "D_POSITION");
-	MediaItem* sel_item = GetSelectedMediaItem(0, 0); //selected item
+	item_length = GetMediaItemInfo_Value(sel_item, "D_LENGTH");
-	if (( (sel_item != nullptr) & CountSelectedMediaItems(0) ) == 1) {
+	take_start_offset = GetMediaItemTakeInfo_Value(active_take, "D_STARTOFFS");
-		// collect parameter on sel item and active take for SM decisions and S-pos to ruler-time conversion
+	take_playrate = GetMediaItemTakeInfo_Value(active_take, "D_PLAYRATE");
-		active_take = GetActiveTake(sel_item);  //active take in item
+
-		total_sm = GetTakeNumStretchMarkers(active_take); //count SM in take
+	//zero-anchor
-		item_pos = GetMediaItemInfo_Value(sel_item, "D_POSITION");  //item pos in timeline
+	if (ts[1] <= 0) ts[0] = ts[1]-1; //zero-anchor SM to left of SM1
-		item_length = GetMediaItemInfo_Value(sel_item, "D_LENGTH"); //item length
+	else ts[0] = 0; // zero-anchor SM at 0 (source)
-		take_start_offset = GetMediaItemTakeInfo_Value(active_take, "D_STARTOFFS");  //take start offset
+	tro[0] = tr[1]; //zero-anchor SM ro same rate as rate1(no slope)
-		take_playrate = GetMediaItemTakeInfo_Value(active_take, "D_PLAYRATE"); //take playrate(will combine with SM warping)
+	slope[0] = 0;   //zero-anchor SM flat slope
-		if (total_sm == 0) {
+	tp[0] = ts[0];  //zero-anchor SM P same as its S
-			PreventUIRefresh(1); //prevent UI refresh(hold screen)
+	tdss[0] = ts[1]-ts[0]; //zero-anchor SM ΔSS(next S - this S)
-			//zero-anchor
+	tdpp[0] = tdss[0]/tro[0]; //zero-anchor SM ΔPP = ΔSS/ro
-			if (ts[1] <= 0) ts[0] = ts[1]-1; //zero-anchor SM to left of SM1
+
-			else ts[0] = 0; // zero-anchor SM at 0 (source)
+	PreventUIRefresh(1); //prevent UI refresh(hold screen)
 
-			tro[0] = tr[1]; //zero-anchor SM ro same rate as rate1(no slope)
+	// end-anchor
-			slope[0] = 0;   //zero-anchor SM flat slope
+	ts.push_back(ts[num_ts]+1); //end-anchor SM S at last SM S +1sec
-			tp[0] = ts[0];  //zero-anchor SM P same as its S
+	tr.push_back(tr[num_ts]); //end-anchor SM tr at last SM rate(for array)
-			tdss[0] = ts[1]-ts[0]; //zero-anchor SM ΔSS(next S - this S)
+	//tro[num_ts+1] = tr[num_ts] //end-anchor SM ro at last SM rate
-			tdpp[0] = tdss[0]/tro[0]; //zero-anchor SM ΔPP = ΔSS/ro
+	slope[num_ts+1] = 0; //end-anchor SM flat slope
-			// end-anchor
+	create_sm(0); //create zero-anchor SM using ts, ts as tp, no slope
-			ts[num_ts+1] = ts[num_ts]+1; //end-anchor SM S at last SM S +1sec
+
-			tr[num_ts+1] = tr[num_ts]; //end-anchor SM tr at last SM rate(for array)
+	for (size_t i = 1; i <= num_ts; ++i) { //loop through table positions and rates, using <= instead of < for 1-based array
-			//tro[num_ts+1] = tr[num_ts] //end-anchor SM ro at last SM rate
+		tro[i] = (tr[i]+tr[i+1])/2; //overall rate = mean of r1 and r2 rates for marker
-			slope[num_ts+1] = 0; //end-anchor SM flat slope
+		slope[i] = 1-((2*tr[i])/(tr[i]+tr[i+1])); //slope = function of r1 and r2
 		tp[i] = tp[i-1]+tdpp[i-1]; // this P = last P + last ΔPP
-			create_sm(0); //create zero-anchor SM using ts, ts as tp, no slope
+		tdss[i] = ts[i+1]-ts[i]; // this ΔSS = next S - this S
 		tdpp[i] = tdss[i]/tro[i]; // this ΔPP = ΔSS/ro
-			for (size_t i = 1; i <= num_ts; ++i) { //loop through table positions and rates, using <= instead of < for 1-based array
+		create_sm(i); //create SM using ts, ts as tp, no slope
-				tro[i] = (tr[i]+tr[i+1])/2; //overall rate = mean of r1 and r2 rates for marker
+
-				slope[i] = 1-((2*tr[i])/(tr[i]+tr[i+1])); //slope = function of r1 and r2
+
-				tp[i] = tp[i-1]+tdpp[i-1]; // this P = last P + last ΔPP
+	tp[num_ts+1] = tp[num_ts]+tdpp[num_ts]; //end-anchor SM P = last P + last ΔPP
-				tdss[i] = ts[i+1]-ts[i]; // this ΔSS = next S - this S
+	create_sm(num_ts+1); //create end-anchor SM using ts, ts as tp, no slope
-				tdpp[i] = tdss[i]/tro[i]; // this ΔPP = ΔSS/ro
+
-				create_sm(i); //create SM using ts, ts as tp, no slope
+	//modify all SM using ts, tp, slope
-			}
+	for (size_t i = 0; i <= num_ts+1; ++i) {
 		SetTakeStretchMarker(active_take, i, tp[i], nullptr);
-			tp[num_ts+1] = tp[num_ts]+tdpp[num_ts]; //end-anchor SM P = last P + last ΔPP
+		SetTakeStretchMarkerSlope(active_take, i, slope[i]);
-			create_sm(num_ts+1); //create end-anchor SM using ts, ts as tp, no slope
+
 
-			for (size_t i = 0; i <= num_ts+1; ++i) { //using <= instead of < for 1-based array
+	PreventUIRefresh(-1); //restore UI refresh
-				modify_sm(i); //modify all SM using ts, tp, slope
+	UpdateArrange(); //redraws the arrange window
-			}
+
-			PreventUIRefresh(-1); //restore UI refresh
+