Loading ...
Sorry, an error occurred while loading the content.

Re: [Clip] title underline up and down with two characters

Expand Messages
  • Jody
    Hi Manuel, ... Try this: H=Manuel s Lines ^!FocusDoc ^!Jump LINE_END ^!Set %TitleLength%=^$Calc((^$GetCol$-1)/2;0)$ ^!If ^%TitleLength%
    Message 1 of 2 , Feb 2, 2001
    View Source
    • 0 Attachment
      Hi Manuel,

      >o-o-o-o-o-o
      >Jody
      >o-o-o-o-o-o

      Try this:

      H=Manuel's Lines
      ^!FocusDoc
      ^!Jump LINE_END
      ^!Set %TitleLength%=^$Calc((^$GetCol$-1)/2;0)$
      ^!If ^%TitleLength% < 1 Exit
      ^!SetPasteIndent Off
      ^!InsertText ^P^$StrFill(o-;^%TitleLength%)$
      ^!Keyboard UP UP
      ^!InsertText ^P^$StrFill(o-;^%TitleLength%)$

      Happy Clip'n!
      Jody

      http://www.notetab.net

      Subscribe, UnSubscribe, Options
      mailto:Ntb-Clips-Subscribe@yahoogroups.com
      mailto:Ntb-Clips-UnSubscribe@yahoogroups.com
      http://www.egroups.com/group/ntb-clips
    Your message has been successfully submitted and would be delivered to recipients shortly.