Rrerku

Apologies for flooding the site with tikzmark problems ... :)

I know that with iftikzmark I can test if a given tikzmark exists in general. Is there a way to test if a particular tikzmark exists on the same page?

Use case: I'm trying to design macros that I can insert anywhere in a text that would draw a line between them –- a linestart and a linefinish command. However, when the linefinish command happens to fall on a subsequent page, the line gets drawn to where the linestart command was on the previous page. I would rather have it instead "do something else", here, just for purpose of illustration, draw me a black square – or, ideally "point across" the page in the direction to where the other mark is sitting.

In the code below, I've tried to construct what I'm envisioning using iftikzmark but that does not work.

documentclassarticle
usepackagetikz
usetikzlibrarytikzmark
newcountertikzmkstartsetcountertikzmkstart0 % 
newcountertikzmkfinishsetcountertikzmkfinish0 % 

newcommandlinestart%
stepcountertikzmkfinishiftikzmarkbthetikzmkfinish% tikzmark exists on same page
stepcountertikzmkstarttikzmarknodeathetikzmkstartvphantomxaddtocountertikzmkfinish-1
% tikzmark doesn't exist on page
begintikzpicture draw [line width=4] (0,0) -- (.1,0); endtikzpictureaddtocountertikzmkfinish-1% black square if linefinish on next page

newcommandlinefinish%
iftikzmarkathetikzmkstart% tikzmark exists on same page
stepcountertikzmkfinishtikzmarknodebthetikzmkfinishvphantomxbegintikzpicture[remember picture] draw[overlay] (athetikzmkstart.west) -- (bthetikzmkfinish.west); endtikzpicture
% tikzmark doesn't exist on page
begintikzpicture draw [line width=4] (0,0) -- (.1,0); endtikzpicture

begindocument 
Text linestart text text 

Text text text 
%newpage

Text text linefinish text
enddocument

Any ideas of how else I might accomplish something like this would be very welcome!

Update: Based on @marmot's suggestion to look at this answer, I've now come up with the following. However, I'm stuck with how to make the lines "point across" the page breaks ...

documentclassarticle
usepackagerefcount
usepackagetikz
usetikzlibrarycalc

newcountertmp
newcommandtikzmark[1]%
 tikz[overlay,remember picture] node (#1) ;

newcommandlinestart%
 stepcountertmp%
 tikzmarkalabelathetmp%
 ifnumgetpagerefnumberathetmp=getpagerefnumberbthetmp else
 begintikzpicture[overlay, remember picture]
 draw [thick] 
 (a.west) -- (b.west); 
 endtikzpicture%
 fi%



newcommandlinefinish%
tikzmarkblabelbthetmp
 ifnumgetpagerefnumberathetmp=getpagerefnumberbthetmp
 begintikzpicture[overlay, remember picture]
 draw [thick]
 (a.west) -- (b.west); 
 endtikzpicture%
 else
 begintikzpicture[overlay, remember picture]
 draw [thick]
 (a.west) -- (b.west); 
 endtikzpicture%
 fi


newcommandSqu[1]linestart#1linefinish

begindocument

Text linestart text text

Text text text

Text text linefinish text

Text linestart text text

Text text text
newpage

Text text linefinish text

enddocument

I can see the point of having a iftikzmarkonpage conditional, so I've added it to the tikzmark package (download tikzmark.dtx and run tex tikzmark.dtx to get the latest version). This introduces a new conditional, iftikzmarkoncurrentpage<tikzmark name>. That copes with the issue about the lines being drawn on both pages when needed.

documentclassarticle
usepackage[a6paper]geometry
%urlhttps://tex.stackexchange.com/q/483547/86
usepackagetikz
usepackagetikzpagenodes
usetikzlibrarytikzmark
newcountertikzmarklinessetcountertikzmarklines0 % 

tikzset
 tikzmark prefix=prefix-,
 tikzmark suffix=-suffix


newcommandlinestart%
 stepcountertikzmarklines%
 tikzmarkathetikzmarklines%
 iftikzmarkoncurrentpagebthetikzmarklines%
 else
 begintikzpicture[remember picture,overlay,next page=below]%
 clip (current page text area.south west) rectangle (current page text area.north east);
 draw[line width=4] (pic cs:athetikzmarklines) -- (pic cs:bthetikzmarklines);
 endtikzpicture%
 fi


newcommandlinefinish%
 tikzmarkbthetikzmarklines%
 begintikzpicture[remember picture,overlay,next page=below]%
 clip (current page text area.south west) rectangle (current page text area.north east);
 draw[line width=1] (pic cs:athetikzmarklines) -- (pic cs:bthetikzmarklines);
 endtikzpicture%
 

begindocument 
Text linestart text text 

Text text text 

Text text linefinish text

newpage

Text text text 

Text linestart text text 

Text text text 
newpage

Text text text

Text text linefinish text
enddocument