Numbering paragraphs: possible?

[martin]

Hamid: Wow! You are right, the straight quotes went curly, I hadn't noticed.

For non-Perl macros this should not make a difference. Straight and curly quotes are equivalent. However, you must take care to save the macro as a "Nisus Macro", not a "Nisus Perl Macro".

Now if I could make this macro to work on selected text only, it would be a good replacement for the old Number Renumber Lines (Perl) macro.
Perhaps Martin knows how to do that?

The following macro should do the trick:

Code: Select all

# calculate the selection endpoint so we can stop there
$bound = Selection Location
$selLen = Selection Length
$bound += $selLen

# keep searching for the start of a paragraph
$count = 0 
$isContinue = 1
While $isContinue
	$isContinue = Find ‘^(?:\d+\.?\s*)?’, ‘E-W’
	If $isContinue
		$foundLoc = Selection Location
		$foundLen = Selection Length
		If $foundLoc >= $bound
			# we’ve left the original selection
			$isContinue = 0
		Else
			# number the paragraph
			$count += 1
			Insert Text “$count. ”
			
			# adjust boundary to account for replacement
			$delta = Selection Length
			$delta -= $foundLen
			$bound += $delta

			Select End
		End
	End
End 

[Dirk_Barends]

Thank you very much Martin, this macro seems to work well!
Another candidate for the Nisus Writer Pro Macro Repository?

Dirk Barends

[Anne Cuneo]

Anne Cuneo wrote:
Thanks Martin, but I think there still is a problem, when I want to apply the Macro, il tells me there is an error in the first line. Am I missing something here?

Did you save it as a Nisus Macro? As for example:
Number Lines.nwm

It took some time, I had other things to do urgently in between, but I finally tried Martin's edited macro as Nisus macro (not pearl), and it works. I am really relieved! Now I can stop worrying that I'll forget a paragraph in my translation. Thanks everybody!

I didn't try to fix the curly quotes problem - but as I don't need this now, I'll just file it for further use .
Thanks again!

PS. And for literature lovers, look out for the film I just translated and needed the paragraph numbering for, about Max Frisch, by Mathias von Gunten - fascinating!