Thank you for the clip Hugo-it works great.

In an outline, I would like to be able to go the last spot I was at in a topic
without setting a bookmark. Is there a way to do this? (The reason for not
wanting a bookmark is because the "last spot" is always changing.

Linda
   ----- Original Message -----
   From: Hugo Paulissen
   To: ntb-clips@yahoogroups.com
   Sent: Tuesday, August 24, 2004 6:42 AM
   Subject: Re: [Clip] Need help with clip


   Linda,

   > 1. I use a clip to add the date to files. Is there a way to have
   the clip add a day? For instance, instead of having the clip paste
   today's date, I want tomorrow's date.

   To the best of my knowledge you cannot do it without a very
   complicated clip. If you download a small dos-program (DOFF.exe)
   however...

   http://www.jfitz.com/dos/

   I have it in my NoteTab folder, in a subdirectory APPS. The clip
   below assumes DOFF is in the Apps-subdir.

   With this clip I get tomorrows date in mm-dd-yy format.

   ^!Set %DOFFPATH%=^$GetShort(^$GetAppPath$Apps\doff.exe)$
   ^!Set %OUTPUT%=mm-dd-yy +1xd
   ;^!Set %OUTPUT%=-h
   ^!Set %TOMORROW%=^$GetDosOutput(^%DOFFPATH% ^%OUTPUT%)$
   ^$strTRIM(^%TOMORROW%)$

   DOFF -h shows the help for DOFF...

   I didn't care to surround the path- and filenames with quotes
   although that would have been better...


   Regards,

   Hugo



         Yahoo! Groups Sponsor
               ADVERTISEMENT





------------------------------------------------------------------------------
   Yahoo! Groups Links

     a.. To visit your group on the web, go to:
     http://groups.yahoo.com/group/ntb-clips/

     b.. To unsubscribe from this group, send an email to:
     ntb-clips-unsubscribe@yahoogroups.com

     c.. Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.



[Non-text portions of this message have been removed]

Linda,

If the last spot is always the last heading in an outline, here is an
example I use at work. I am salaried, but I track my start and end of
the day to show my boss how much I'm doing.

Anyway, here's the basics of the clip:

^!Open c:\notetab\documents\time_tracker.otl
;^$IsOutlineDoc$
^!Jump Doc_End

^!AddHeading ^$GetDate("mmmm dd, yyyy")$

The ^!Jump Doc_End will go to the end of the outline, or any other text
file.

If you want to set the file to open where you left off when you re-start
   NoteTab, there is a setting under View > Options and check Reload Open
Documents. This works for both otl and regular text file. I am using
NotePro right now, but as I recall Light and Standard function the same way.

  From Help:

Reload Open Documents: Use this option if you want the documents that
were open when you closed the editor to be reopened next time you start
the editor. Files that no longer exist are ignored by this feature.

If you mean something else, that does not involve a bookmark, it will
probably take a clip setting a variable that gets saved in the
NoteTab.ini or a custom ini file.

I seem to vaguely remember, did Larry Thomas or someone else do a clip
doing something like this with bookmarks? Perhaps a search of the
archives, or someone with a better memory, or a clip at hand, might have
more to offer.

HTH,

Larry Hamilton
lmh@...
My Webpage
http://members.tripod.com/~notlimah/index.htm


Dave & Linda Guss wrote:
> Thank you for the clip Hugo-it works great.
>
> In an outline, I would like to be able to go the last spot I was at in a topic
without setting a bookmark. Is there a way to do this? (The reason for not
wanting a bookmark is because the "last spot" is always changing.
>
> Linda
>   ----- Original Message -----
>   From: Hugo Paulissen
>   To: ntb-clips@yahoogroups.com
>   Sent: Tuesday, August 24, 2004 6:42 AM
>   Subject: Re: [Clip] Need help with clip
>
>
>   Linda,
>
>   > 1. I use a clip to add the date to files. Is there a way to have
>   the clip add a day? For instance, instead of having the clip paste
>   today's date, I want tomorrow's date.
>
>   To the best of my knowledge you cannot do it without a very
>   complicated clip. If you download a small dos-program (DOFF.exe)
>   however...
>
>   http://www.jfitz.com/dos/
>
>   I have it in my NoteTab folder, in a subdirectory APPS. The clip
>   below assumes DOFF is in the Apps-subdir.
>
>   With this clip I get tomorrows date in mm-dd-yy format.
>
>   ^!Set %DOFFPATH%=^$GetShort(^$GetAppPath$Apps\doff.exe)$
>   ^!Set %OUTPUT%=mm-dd-yy +1xd
>   ;^!Set %OUTPUT%=-h
>   ^!Set %TOMORROW%=^$GetDosOutput(^%DOFFPATH% ^%OUTPUT%)$
>   ^$strTRIM(^%TOMORROW%)$
>
>   DOFF -h shows the help for DOFF...
>
>   I didn't care to surround the path- and filenames with quotes
>   although that would have been better...
>
>
>   Regards,
>
>   Hugo

Thanks a lot Hugo, hrs & Jody for helping with this.
I've found what was wrong.

Using debug showed that it's the
   ^!Jump line_start
line which is causing the backwards jump.  Eliminate that
and the clip works fine - at least on everything I've tried
it on so far.

To recap, within the limits of my testing:  the trouble
occurs on Ntb Std, Win98 se, with version 4.00.834.839 of
riched32.dll, in long files - between around 50k down and
the ending few kb of the file.

John


hsavage wrote:
>
> jxz wrote:
>  >
>  > Hugo wrote:
>  >
>  >> I've never seen this... If you could send us the clip we could
> try
>  >> out if the same thing happens on our side.
>  >> Regards,
>  >> Hugo
>  >
>  > That's quite possible.  But just prior to responding to you,
>  > I used Ntb Std's menus to alter multiple spaces to single
>  > ones, towards the end of a 650k file, and when it had
>  > finished the whole of the file was selected (and had
>  > presumably been operated on - I didn't check).
>  >
>  > the last line just being a debugging aid.
>  > S row & col are the start ones, E the end ones, the
>  > algorithm being:
>  > - record the initial cursor position
>  > - do the find, make sure cursor is at start of line
>  > - record the ending cursor position
>  > - jump back to initial cursor position
>  > - select down to end cursor position
>  > - do a copy
>  >
>  > Kind of you to spend time on it
>  > John
>
> John,
>
> I performed the single-space conversion on a file over 34mbytes in
> size, if nothing is pre-selected whole file is operated on, and
> left in selected state, otherwise, only pre-selected text is
> operated on.
>
> As for your clip, it works correctly, exactly as written, and as
> you described above, at the end of the same 34mb file.  I'm
> pasting your clip, commented, slightly revised, and a revised,
> hopefully more efficient clip, using most of your code below it.
>
> Three important things to note, my OS is XP, the testfile size is
> far greater than you specify, set wordwrap off any time you
> operate directly on any text file, you can always turn it back on
> at the end of clip.
>
> H="Find delimiter Test"
> ; 3 lines added,
> ; 1. sets all variables to Zero,
> ^!ClearVariables
> ;
> ; 2. turns wordwrap off so your clip gets an accurate line
> reference count,
> ; linecount isn't accurate, at least in Pro, with wordwrap on.
> ^!SetWordWrap 0
> ;
> ; 3. so you can track clip operation line by line.
> ^!SetDebug 1
> ;
> ; sets cursor position Starting Row:Column
> ^!Set %sRow%=^$GetRow$
> ^!Set %sCol%=^$GetCol$
> ;
> ; finds, selects, first underscore delimiter Forward From Cursor
> Position
> ^!Find "__________" TI
> ^!IfError EXIT
> ;
> ; jumps to column 1 on delimiter line thereby Deselecting The
> Found Delimiter
> ^!Jump LINE_START
> ;
> ; sets cursor position, Ending Row:Column
> ; redundant in this clip, except for visually establishing Ending
> Row:Column
> ^!Set %eRow%=^$GetRow$
> ^!Set %eCol%=^$GetCol$
> ;
> ; moves cursor back to Starting Row:Column
> ^!SetCursor ^%sRow%:^%sCol%
> ;
> ; selects from -starting Row:Column -ending Row:Column
> ^!SelectTo ^%eRow%:^%eCol%
> ;
> ; copies selection to clipboard
> ^!Keyboard CTRL+C
> ;
> ; presents info box showing Starting Row:Column, Ending Row:Column
> ^!Info Start row ^%sRow%, col ^%sCol%^%nl%End row ^%eRow%, col ^%eCol%
>
> H="Find delimiter Test1"
> ^!ClearVariables
> ^!SetWordWrap 0
> ^!SetDebug 1
> ^!Set %sRow%=^$GetRow$
> ^!Set %sCol%=^$GetCol$
> ^!Find "__________" TI
> ^!IfError EXIT
> ^!Jump LINE_START
> ;
> ; redundant lines deactivated
> ;^!Set %eRow%=^$GetRow$
> ;^!Set %eCol%=^$GetCol$
> ;^!SetCursor ^%sRow%:^%sCol%
> ;^!SelectTo ^%eRow%:^%eCol%
> ;
> ; altered ^!SelectTo line added
> ^!SelectTo ^%sRow%:^%sCol%
> ^!Keyboard CTRL+C
> ^!Info Start row ^%sRow%, col ^%sCol%^%nl%End row ^%eRow%, col ^%eCol%
>
> hrs
>
>
>
> Yahoo! Groups Links
>
>
>
>

I need a clip to strip URL's from an HTML document and leave the
rest of the HTML formatting intact. I tried to write one myself but
made a totall mess so far. I am not experienced enough. Does anyone
have such a clip ready and/or can anyone give me an advice how to
create one? I would be most grateful
Thank you for your attention.

> I need a clip to strip URL's from an HTML document and leave the
> rest of the HTML formatting intact. I tried to write one myself but
> made a totall mess so far. I am not experienced enough. Does anyone
> have such a clip ready and/or can anyone give me an advice how to
> create one?

I use the following

^!Jump Text_Start
:HTMLs
^!Find " href=" TIS
^!IfError End
^!Select HTMLTag
^!InsertText ^%Empty%
^!GoTo HTMLs
:End

Try it out on a sample or two and see if it gives what you want

> Is a calling clip able to initiate the editing of another clip in another
library?
> I would like the calling clip to initiate the editing of MyFarClip in
SecondLib.clb.
> Manually, I switch to SecondLib.clb, right click on MyFarClip, left click
on EDIT CLIP.
>

How about replacing the ^!LoadLibrary with

^!Open "C:\Program Files\NoteTab Pro\Libraries\SecondLib.clb"

(which opens that library as a document), searching for the clip in
question, and then editing it.
You'd have to be careful to not make unwanted changes in other clips in that
library of course.

That would do the trick, Don.

Like you say, I would have to be careful to not make unwanted changes in
other clips.
But your technique will work.

Thanks.

----- Original Message -----
From: "Don Daugherty" <daugherty@...>
To: <ntb-clips@yahoogroups.com>
Sent: Friday, August 27, 2004 8:30 AM
Subject: Re: [Clip] How to edit a farclip?


> > Is a calling clip able to initiate the editing of another clip in
another
> library?
> > I would like the calling clip to initiate the editing of MyFarClip in
> SecondLib.clb.
> > Manually, I switch to SecondLib.clb, right click on MyFarClip, left
click
> on EDIT CLIP.
> >
>
> How about replacing the ^!LoadLibrary with
>
> ^!Open "C:\Program Files\NoteTab Pro\Libraries\SecondLib.clb"
>
> (which opens that library as a document), searching for the clip in
> question, and then editing it.
> You'd have to be careful to not make unwanted changes in other clips in
that
> library of course.
>
>
>
>
>
>
> Yahoo! Groups Links
>
>
>
>
>

How can I make the following script display as a single dialog box
instead of two?

^!SET %name%=^?{Author Name=^$GetValue(author:name)$}
^!SET %initials%=^?{Author Initials=^$GetValue(author:initials)$}
^!SaveValue author:initials=^%initials%
^!SaveValue author:name=^%name%

I started out with the square brackets but the 'getvalue' function
winds up displaying as the prompt. I'm just wondering if there is
yet another way to do it that I've missed due to my being a notetab
newbie

Thanks, great, this is good for learning, I see what I did wrong:
the ^%Empty% did the trick.
Another option I try to insert is a !Set %Range%  to execute the
strip URL clip only on a selection. No luck so far, I mess that one
up. Any idea/help most welcome, this is a great way to learn.

Thank you for your help!

--- In ntb-clips@yahoogroups.com, "Don Daugherty" <daugherty@k...>
wrote:
> I use the following
>
> ^!Jump Text_Start
> :HTMLs
> ^!Find " href=" TIS
> ^!IfError End
> ^!Select HTMLTag
> ^!InsertText ^%Empty%
> ^!GoTo HTMLs
> :End
>
> Try it out on a sample or two and see if it gives what you want

Hi Dave,

>How can I make the following script display as a single dialog box
>instead of two?

When using braces (instead of brackets) you need to put is all in
one ^!Set command separated by a semi-colon delimiter:

^!Set %name%=^?{Author Name=^$GetValue(author:name)$}; %initials%=^?{Author
Initials=^$GetValue(author:initials)$}

>^!SET %name%=^?{Author Name=^$GetValue(author:name)$}
>^!SET %initials%=^?{Author Initials=^$GetValue(author:initials)$}
>
>I started out with the square brackets but the 'getvalue' function
>winds up displaying as the prompt.

Yes, that is correct. They both (braced and bracketed) have
different uses and function differently. They both have their
advantages and disadvantages.

Look up "Clip Wizard and Fields" in Help | Help on Clipbook Programming.

Look in Lesson Two of...
The following is a download for a Clipbook programming tutorial
designed to walk you through Clip writing. It includes "Getting
Started" (which is a web page with a number of images displaying
different parts of NoteTab that deals with Clipbooks), making a
Clipbook Library, adding Clips, and editing Clips, on to more
difficult Clip writing. Be sure to read the Introduction also.
Open ClipTut.clb and then click on the ClipTut.otl Outline Clip
to open the Outline.

All the contents of the zip files go in NoteTab's Libraries
folder. http://www.notetab.net/zip/cliptut.zip

Subscribe, unSubscribe, Options
mailto:ntb-Clips-Subscribe@yahoogroups.com
mailto:ntb-Clips-unSubscribe@yahoogroups.com
http://groups.yahoo.com/group/ntb-clips

Happy Clip'n! Jody

http://www.notetab.net http://www.notetab.net/html/cd-info.htm
http://www.fookes.com/regnow.html?2448&item=home

Dave Evartt wrote:
> How can I make the following script display as a single dialog box
> instead of two?
>
> ^!SET %name%=^?{Author Name=^$GetValue(author:name)$}
> ^!SET %initials%=^?{Author Initials=^$GetValue(author:initials)$}
> ^!SaveValue author:initials=^%initials%
> ^!SaveValue author:name=^%name%
>
> I started out with the square brackets but the 'getvalue' function
> winds up displaying as the prompt. I'm just wondering if there is
> yet another way to do it that I've missed due to my being a notetab
> newbie

Dave,

Make 1 long line from the 2 set variable lines.  Do so by eliminating
the second set command and join both lines using a semi-colon, space and
the second variable as in the following line.  Don't forget, if you have
wordwrap off this will be one continuous line.

^!SET %name%=^?{Author Name=^$GetValue(author:name)$};
%initials%=^?{Author Initials=^$GetValue(author:initials)$}


hrs

Meanwhile I found out that !Set %Range% was not very clever of me,
neither was $GetSelections and other things I tried. ;-)
I use a ^!Jump Select_Start now that works fine for beginning, but
where should I put the Select_End (or whatever) to let the function
operate only on the selection? Yes, I am an absolute beginner, only
very simple clips so far.
Thanks for your attention!

--- In ntb-clips@yahoogroups.com, "manon_purple" <manon_purple@y...>
wrote:
> Thanks, great, this is good for learning, I see what I did wrong:
> the ^%Empty% did the trick.
> Another option I try to insert is a !Set %Range%  to execute the
> strip URL clip only on a selection. No luck so far, I mess that
one
> up. Any idea/help most welcome, this is a great way to learn.
>
> Thank you for your help!

Hi,

----- on 28.08.2004 09:13 manon_purple wrote:

> I use a ^!Jump Select_Start now that works fine for beginning, but
> where should I put the Select_End (or whatever) to let the function
> operate only on the selection? Yes, I am an absolute beginner, only
> very simple clips so far.
> Thanks for your attention!

You might read the Help file about the commands
^$getrowstart$ and ^$getrowend$.


Select something, then
^!set %end%=^$getrowend$

and let the clip stop by
^!if ^$getrow$ >= ^%end% exit

BTW: There are also ^$getcolstart$ and ^$getcolend$


Regards,

Melchior





--
http://loc.alphazwirbel.net
http://orp.alphazwirbel.net

Thanks, got it, works perfect!!

--- In ntb-clips@yahoogroups.com, melchior prisi <mprisi@s...> wrote:
> Hi,
> You might read the Help file about the commands
> ^$getrowstart$ and ^$getrowend$.
>
>
> Select something, then
> ^!set %end%=^$getrowend$
>
> and let the clip stop by
> ^!if ^$getrow$ >= ^%end% exit
>
> BTW: There are also ^$getcolstart$ and ^$getcolend$
>
>
> Regards,
>
> Melchior
>
>
>
>
>
> --
> http://loc.alphazwirbel.net
> http://orp.alphazwirbel.net

--- In ntb-clips@yahoogroups.com, "Roy Herring" <roynancy@e...> wrote:
> Is a calling clip able to initiate the editing of another clip in
another library?
> I would like the calling clip to initiate the editing of MyFarClip
in SecondLib.clb.
> Manually, I switch to SecondLib.clb, right click on MyFarClip, left
click on EDIT CLIP.
>
> In the calling clip, I can switch to (SecondLib) as follows:
>    ^!LoadLibrary C:\Program Files\NoteTab Pro\Libraries\SecondLib.
clb
> But I can't find a command to edit MyFarClip.
>
> Thanks for any help,
> Roy
>
>
Here how you can do this:
----------------------------------------------
; Show Headers in menu must be checked
^!Menu Tools/Clipbook Properties/Show Headers
^!LoadLibrary "HTML"
^!Keyboard Shift+Ctrl+E
; Loops without label
^!Find "HTML begin" TIS
^!IfError end
^!If ^$GetRow$=1 end
^!Jump select_end
; Go back 4 lines of code
^!Goto skip_-4
-----------------------------------------------
I hope this helps you

Giannis

; Clipbook Commander
; Start Rhodes 20/3/2004 giannis_rho@...
; Incompleted just for test
:start
^!StatusShow Clipbook Commander ...
;^!ClearVariables
^!Set %doc%=^$GetDocIndex$; %clips%=^%empty%; %CCSeparator%=^%empty%
; gets active clipbook (and list mode) from ClipbookCommander.ini and
check if exist
^!SetIniFile ClipbookCommander
^!Set %clipbook%=^$GetValue(Clipbooks:Active)$; %mode_d%
=^$GetValue(Clipbooks:Mode)$
^!Set %clipFile%=^$GetLibraryPath$^%clipbook%.clb
^!IfFileExist "^%clipFile%" next else default
; List mode can be Normal or Array else Normal
^!IfTrue ^$StrCount("^%mode_d%";"Normal Array";No;Yes)$<>1 ^!Set %
mode_d%=Normal
; check if clip's list needs update in ClipbookCommander.ini
; (gets file's day YYYYMMDDHHNNSS)
^!Set %id%=^$GetFileDate("^%clipFile%")$^$GetFileTime("^%clipFile%")$
^!If ^$GetValue(Clipbooks:^%clipbook%_id)$ <> ^%id% update
; if clip's list doesn't needs update, gets clips from ini (fast)
^!Set %clips%=^$GetValue(Clipbooks:^%clipbook%)$
^!Goto telos
; -------Updates clip's list in ClipbookCommander.ini-------
:update
;^!StatusShow Please wait......
; saves clipbook_id -->(file's date-time yyyymmddhhnnss)
^!SaveValue Clipbooks:^%clipbook%_id=^%id%
^!SetScreenUpdate off
; opens clipbook file
^!Open "^%clipFile%"
; -- loop to gets clipbook's clips
^!Find "H="" TIS
^!IfError skip_7
^!Jump select_end
^!If ^$GetCol$=4 next else skip_-3
^!IfSame "^$GetChar$" ";" skip_-4
^!IfSame "^$GetChar$" "_" skip_-5
^!Select eol
^!Set %clips%=^%clips%^$StrReplace("|";"¦";
"^$StrDeleteRight("^$GetSelection$";1)$";No;No)$|
^!Goto skip_-8
; -- loop end
^!Set %clips%="^$StrReplace("{";"^$DecToChar(3)$";"^%clips%";No;No)$"
^!Set %clips%="^$StrReplace("}";"^$DecToChar(4)$";"^%clips%";No;No)$"
^!Set %clips%="^$StrReplace("^=";"^$DecToChar(6)$";"^%clips%";No;No)$"
; saves clips to ClipbookCommander.ini
^!SaveValue Clipbooks:^%clipbook%=^%clips%
^!Set %clips%=^%clips%
^!Close "^%clipFile%" discard
^!SetDocIndex ^%doc%
^!SetScreenUpdate on
; ------------------------Update end------------------------
:telos
^!SetListDelimiter |
^!SetArray %clips%=^%clips%
; list of all clibooks in clipbook dir
^!SetArray %clipbooks%=^$GetFiles("^$GetLibraryPath$";*.clb;name)$
^!SetArray %clipbooks%=^$StrReplace("^$GetLibraryPath$";"";"^%
clipbooks%";No;No)$
^!SetArray %clipbooks%=^$StrReplace(".clb";"";"^%clipbooks%";No;No)$
^!SetArray %clipbooks%=^$StrReplace("_";"\";"^%clipbooks%";No;No)$
^!Set %d_clipbook%=^$StrReplace("_";"\";"^%clipbook%";No;No)$
; Sets list mode
^!IfSame "^%mode_d%" "Normal" next else skip_2
^!Set %m%=(H=10); %mode%=_Normal|Array (NOT working with some clips)
^=Array
^!Goto skip
^!Set %m%=(T=A;H=10); %mode%=Normal|_Array (NOT working with some
clips)^=Array
; Gets favorities
^!SetArray %favs%=^$GetValue(Favorities:Favs)$
; dialog
^!Set %up%=0; %i%=0
^!StatusShow
^!SetWizardLabel ÿÿÿÿÿÿÿÿÿ=
5;ÿÿÿ< ^%clipbook% >ÿÿÿÿÿÿÿ=
;ÿÿÿÿÿÿ
^!SetArray %clip%=^?{^%m%^$Calc(^%clips0%-1)$ ^%clipbook%'s Clips
(Ctrl+Ok execute and add to favs)==Custom Array (Opens new dialog)....
^=custom|¯¯¯¯¯¯¯¯¯¯¯=
¯¯¯! ^$Calc(^%clips0%-1)$ ^%clipbook%'s clips !
¯¯¯¯¯¯¯¯¯¯¯¯
=
75;^=|^$SetDefaultValue(^%clips%;^$GetValue(Clipbooks:^%
clipbook%_clip)$)$}; %fav%=^?{^%m%^$Calc(^%favs0%-1)$ Favorities
(Alt+OK remove, Ctrl+OK move item first)==^%favs%}; %mode%=^?{Double
click to changes list mode to ==^%mode%}; %edit%=^?{==_Execute|Edit
FarClip (Only first item)^=editclip}; %other%=^?{^%clipbooks0%
Clipbooks=^$SetDefaultValue(^%clipbooks%;^%d_clipbook%)$}
; Checking if you changes mode
^!IfSame "^%mode%" "^%mode_d%" skip_2 else next
^!SaveValue Clipbooks:Mode=^%mode%
^!Set %up%=5
; checking if you changes clipbook
^!IfSame "^$StrReplace("\";"_";"^%other%";No;No)$" "^%clipbook%"
skip_2
; if you changes clipbook, saves it to ini and goes to start
^!SaveValue Clipbooks:Active=^$StrReplace("\";"_";"^%other%";No;No)$
^!Goto start
^!If ^%up%=5 ^!Goto start
; Favorities executing
^!IfFalse ^$IsEmpty(^%fav%)$ ^!Goto fav
^!IfSame "^%clip1%" "custom" ^!Goto Custom
; saves clipbook active clip
^!SaveValue Clipbooks:^%clipbook%_clip=^%clip1%
^!IfFalse ^$IsCtrlKeyDown$ execute
^!If ^$StrCount("^%clipbook%--:--^%clip1%";"^%favs%";no;no)$>0 skip
^!SaveValue Favorities:Favs=^%favs%^%clipbook%--:--^%clip1%|
:execute
;^!Info clip=^%clip%
; unload ClipbookCommander.ini
^!SetIniFile
^!SetWizardLabel
^!SetPasteIndent off
; Loop to execute clips
^!Inc %i%
^!If ^%i% > ^%clip0% end
^!Set %clip^%i%%=^$StrReplace("¦";"|";"^%clip^%i%%";No;No)$
^!Set %clip^%i%%="^$StrReplace("^$DecToChar(3)$";"{";"^%clip^%i%%";No;
No)$"
^!Set %clip^%i%%="^$StrReplace("^$DecToChar(4)$";"}";"^%clip^%i%%";No;
No)$"
^!Set %clip^%i%%="^$StrReplace("^$DecToChar(6)$";"^=";"^%clip^%i%%";
No;No)$"
^!FarClip ^%clipbook%.clb:"^%clip^%i%%"
^!InsertText ^%CCSeparator%
^!Goto skip_-8
; LoopEnd
;-----------Favorities-----------
:fav
^!IfSame "^%edit%" "editclip" editfavclip
^!IfTrue ^$IsAltKeyDown$ del_fav
^!IfTrue ^$IsCtrlKeyDown$ move_fav
; unload ClipbookCommander.ini
^!SetIniFile
^!SetWizardLabel
; Loop to execute clips
^!Inc %i%
^!If ^%i% > ^%fav0% end
^!Set %fav^%i%%=^$StrReplace("¦";"|";"^%fav^%i%%";No;No)$
^!Set %fav^%i%%="^$StrReplace("^$DecToChar(3)$";"{";"^%fav^%i%%";No;
No)$"
^!Set %fav^%i%%="^$StrReplace("^$DecToChar(4)$";"}";"^%fav^%i%%";No;
No)$"
^!Set %fav^%i%%="^$StrReplace("^$DecToChar(6)$";"^=";"^%fav^%i%%";No;
No)$"
^!SetListDelimiter --:--
^!SetArray %clip%=^%fav^%i%%
^!FarClip ^%clip1%.clb:"^$StrReplace("^%clip1%--:--";"";"^%clip%";No;
No)$"
^!Goto skip_-9
:del_fav
^!Inc %i%
^!If ^%i%>^%fav0% skip_2
^!Set %favs%=^$StrReplace("^%fav^%i%%|";"";"^%favs%";No;No)$
^!Goto skip_-3
^!SaveValue Favorities:Favs=^%favs%
^!Goto start
:move_fav
^!Inc %i%
^!If ^%i%>^%fav0% skip_2
^!Set %favs%=^%fav^%i%%|^$StrReplace("^%fav^%i%%|";"";"^%favs%";No;No)
$
^!Goto skip_-3
^!SaveValue Favorities:Favs=^%favs%
^!Goto start
:editfavclip
;^!SetIniFile ^$GetAppPath$NotePro.ini
;^!SaveValue Clipbook:ShowHeaders=1
;^!ProgIniLoad ^$GetAppPath$NotePro.ini
^!Menu Tools/Clipbook Properties/Show Headers
^!Set %fav1%=^$StrReplace("¦";"|";"^%fav1%";No;No)$
^!Set %fav1%="^$StrReplace("^$DecToChar(3)$";"{";"^%fav1%";No;No)$"
^!Set %fav1%="^$StrReplace("^$DecToChar(4)$";"}";"^%fav1%";No;No)$"
^!Set %fav1%="^$StrReplace("^$DecToChar(6)$";"^=";"^%fav1%";No;No)$"
^!SetListDelimiter --:--
^!SetArray %clip%=^%fav1%
^!Set %clip_search%=^$StrReplace("^%clip1%--:--";"";"^%clip%";No;No)$
^!LoadLibrary "^%clip1%"
^!Keyboard Shift+Ctrl+E
^!Info clip=^%clip%>>clip1=^%clip1%>>find=^%clip_search%
^!Find "^%clip_search%" TIS
^!IfError end
^!If ^$GetRow$=1 end
^!Jump select_end
^!Goto skip_-4
;-----------endFavorities-----------
;-----------CustomArray-------------
:Custom
^!Set %custom_clips%=^%empty%
^!Inc %i%
^!If ^%i%>^%clips0% skip_2
^!Set %custom_clips%=^%custom_clips%^%i%. ^%clips^%i%%^=^%clips^%i%%|
^!Goto skip_-3
^!SetArray %custom%=^?{Custom Array (ListDelemetre +) (Ex.2+1+15+7...)
=}; %CCSeparator%=^?{Separator=^P|^P^P|^T|^P---------^P}; %clip%=^?
{(T=A;H=12) ^%clipbook%'s Clips ---> ^$Calc(^%clips0%-1)$ ==^%
custom_clips%}; %help%=^?{(T=W;H=3)=NOTE: Array STOP working when an
executed clip contents code-line "^!ClearVariables" ...}
^!Set %i%=0
^!IfFalse ^$IsEmpty("^%custom%")$ skip_2
^!IfTrue ^$IsEmpty("^%clip%")$ end
^!Goto execute
^!SetArray %custom%=^$StrReplace("+";"|";"^%custom%";no;no)$
^!Set %clip%=^%empty%; %a%=0
^!Inc %a%
^!If ^%a%>^%custom0% execute
^!SetArray %clip%=^%clip%^%clips^%custom^%a%%%|
^!Goto skip_-3
;----------endCustomArray-----------
:default
^!SaveValue Clipbooks:Active=^$GetLibraryName$
^!SaveValue Clipbooks:Mode=Normal
^!Goto start

Hi giannis_rho,

>; Clipbook Commander
>; Start Rhodes 20/3/2004 giannis_rho@...
>; Incompleted just for test
>:start
>^!StatusShow Clipbook Commander ...

You had many lines get hard line breaks in them. You might want to
upload to the Clips Files are at yahoogroups from the link below.

Also, try using ^$StrFill when you have a bunch of repeated
characters to put in somewhere:

^$StrFill("-";34)$ I think, <g>. ----------------------------------
I'd avoid using ÿ that format in wizard labels, titles, boxes, etc.

Happy Clip'n!
Jody

www.clean-funnies.com, http://www.fookes.us/maillist.htm

Subscribe: mailto:ntb-Clips-Subscribe@yahoogroups.com
UnSubscribe: mailto:ntb-Clips-UnSubscribe@yahoogroups.com
Options: http://groups.yahoo.com/group/ntb-clips

> Meanwhile I found out that !Set %Range% was not very clever of me,
> neither was $GetSelections and other things I tried. ;-)
> I use a ^!Jump Select_Start now that works fine for beginning, but
> where should I put the Select_End (or whatever) to let the function
> operate only on the selection?

If you want to limit ^!Find and or ^!Replace operations to a particular
section of a document,
you can Find something at the very beginning of that section, use ^!Jump
Select_Start, and use
^!Set %MyStart%=^$GetRow$:^$GetCol$ to "remember" where the beginning is.

Next Find something at the very end of that section, preferably something
that won't want to change so you can use the same search criterion if you
need to search for it again.  Then ^!Jump Select_End, followed by
^!Set %MyFinish%=^$GetRow$:^$GetCol$ to "remember" where the end is.

Next use
^!SetCursor ^%MyStart%
^!SelectTo ^%MyFinish%
to select the section in question.

Now you can carryout a more specific !Find or !Replace operation using the H
option to limit the search and/or replace operation to the section.

If you need to make more than one change within the section, you'll probably
need to refresh the definition of %MyFinish%, since adding or deleting
characters within the section would change the true row:col address of the
end of the section.  After refreshing, again use
^!SetCursor ^%MyStart%
^!SelectTo ^%MyFinish%
to select the section in question.  Then make you next change involving a
Find/Replace operations.

Hello,

This email message is a notification to let you know that
a file has been uploaded to the Files area of the ntb-clips
group.

   File        : /Clipbook Commander.clb
   Uploaded by : giannis_rho <giannis_rho@...>
   Description : Clipbook Commander

You can access this file at the URL:
http://groups.yahoo.com/group/ntb-clips/files/Clipbook%20Commander.clb

To learn more about file sharing for your group, please visit:
http://help.yahoo.com/help/us/groups/files

Regards,

giannis_rho <giannis_rho@...>

Hi Don,
Thank you very much. These notes are very instructive. I though I
found the solution with Melchior's advise, but that was only
partially, the function I created only worked on the first part of
the selection.
I am still struggling. If I want to do another search-replace or
insert I currently call another clip, that is not a clean way of
programming, but it works for the time being.
However, working on selections is still troublesome. One time I
think I have it to conclude the next moment it is still not working
the way I want it. If you (or anyone) could post a full example of a
function operating on a selection I would be most grateful. I learn
from examples and tear apart the clips I have found on the internet
so far, but I did not find an example of working on a selection.

By the way, what does TIS mean in your code, this maybe a stupid
question but I have searched the Help file and could not find it and
searching on the seperate items T or I or S gave too many hits to be
useful. The code seems to work without it as well.

Thank you so much for your help!
Best wishes
manon

--- In ntb-clips@yahoogroups.com, "Don Daugherty" <daugherty@k...>
wrote:
> If you want to limit ^!Find and or ^!Replace operations to a
particular
> section of a document,
> you can Find something at the very beginning of that section, use
^!Jump
> Select_Start, and use
> ^!Set %MyStart%=^$GetRow$:^$GetCol$ to "remember" where the
beginning is.
==SNIPPED lots of good instructions for sake of brevity==

Hi,

Thanks  a lot. Now it works ok.

Tuomo
   Luuk. 2:2; ({\cf11\ul Luk_2:2})
   Luuk. 2:2-20; ({\cf11\ul Luk_2:2-20})
   Luuk. 1:1-9; ({\cf11\ul Luk_1:1-9})
   Luuk. 10:1-20; ({\cf11\ul Luk_10:1-20})

   This is the replace command that produces the result.

   ^!Replace {Luuk\.\s}{\d+\:\d+\-*\d*} >> \1\2;\s\(\{\\cf11\\ul
   Luk_\2\}\) WRSA

   There are no open spaces on either side, find or replace.

   hrs


[Non-text portions of this message have been removed]

Here's a clip I bastardized from some html stuff I downloaded from
Jody. It finds the next <a href (case insensitive), selects from
there to the > deletes, then deletes the next </a>  It goes home a
If the html file you are processing has some screwy line breaks like:
<a
href
this clip doesn't work.
Also, if the html is missing or has extra </a> it gets messy.

Anyone got a fix for that?
Rayellen Gilles
MediRegs.
DEL <a href
^!Clearvariables
^!Find <a href I
^!IfError Exit ELSE Next
^!Set %Cursor%=^$Getrow$:^$Getcol$
^!Find >
^!Jump Select_End
^!SelectTo ^%Cursor%
^!InsertText
^!Clearvariables
^!Find </a I
^!IfError Exit ELSE Next
^!Set %Cursor%=^$Getrow$:^$Getcol$
^!Find >
^!Jump Select_End
^!SelectTo ^%Cursor%
^!InsertText
^!Find <a
^!Keyboard HOME



--- In ntb-clips@yahoogroups.com, "manon_purple" <manon_purple@y...>
wrote:
> I need a clip to strip URL's from an HTML document and leave the
> rest of the HTML formatting intact. I tried to write one myself
but
> made a totall mess so far. I am not experienced enough. Does
anyone
> have such a clip ready and/or can anyone give me an advice how to
> create one? I would be most grateful
> Thank you for your attention.

This is a very technical question
I'm running a clip that opens the firstfile in a dir, processes it,
saves it with a better name to a new name and destroys the original
doc.
Then it repeats for the next firstfile.
I'm having trouble terminating.
:Loop
^!Set %FileName%=^$GetFileFirst(^%Dir%;"^%Types%")$
^!IfError ^!GoTo EndLoop ELSE Next
^!Open "^%FileName%"

I was hoping that when it tries to set %FileName% and it is empty,
it would return an error, which would then cause a goto :EndLoop.
I know I just have some silly syntax wrong.
I also tried:
:Loop
^!Set %FileName%=^$GetFileFirst(^%Dir%;"^%Types%")$
^!IfError %Filename%="" ^!GoTo EndLoop ELSE Next
^!Open "^%FileName%"

Any advice?
Thanks
Rayellen Gilles
MediRegs

Hello,

This email message is a notification to let you know that
a file has been uploaded to the Files area of the ntb-clips
group.

   File        : /Clipbook Commander.clb
   Uploaded by : giannis_rho <giannis_rho@...>
   Description : Designed to be button in Toolbar for fast access of any
clipbook's clip

You can access this file at the URL:
http://groups.yahoo.com/group/ntb-clips/files/Clipbook%20Commander.clb

To learn more about file sharing for your group, please visit:
http://help.yahoo.com/help/us/groups/files

Regards,

giannis_rho <giannis_rho@...>

Hi,
----- on 29.08.2004 22:13 prlproductmanager wrote:
> I'm having trouble terminating.
> :Loop
> ^!Set %FileName%=^$GetFileFirst(^%Dir%;"^%Types%")$
> ^!IfError ^!GoTo EndLoop ELSE Next
> ^!Open "^%FileName%"

:Loop
^!Set %FileName%=^$GetFileFirst(^%Dir%;"^%Types%")$
^!iftrue ^$isempty(^%filename%)$ endloop
^!Open "^%FileName%"^

----------

Another solution could look like this:

^!setarray %files%=^$getfiles("^%dir%";"^%types%")$
^!set %ct%=0
^!inc %ct%
^!if ^%ct% > ^%files0% endloop
^!open ^%files^%ct%%
(process this file)
^!goto loop
:endloop




Regards,

Melchior



--
http://loc.alphazwirbel.net
http://orp.alphazwirbel.net

Thank you for your reply! There appear to be many different ways to
write a clip. This one has a problem my
own attempts have as well: it does not operate properly on a
selection in a HTML table for example, with new lines for <tr>,
<td>. It only selects the first instance of HREF and leaves the rest
intact.
As for your question, no I wouldn't know how to make it work
regardless of linebreaks, whitespace etc. Have been looking at it
all weekend, no luck.
But I did find the meaning of T, I, S and the others in the help
file. At least one thing..... ;-)
Well, you never know, maybe someone knows.
Thanks for your help!
--- In ntb-clips@yahoogroups.com, "prlproductmanager"
<rayellen.gilles@v...> wrote:
> Here's a clip I bastardized from some html stuff I downloaded from
> Jody. It finds the next <a href (case insensitive), selects from
> there to the > deletes, then deletes the next </a>  It goes home a
> If the html file you are processing has some screwy line breaks
like:
> <a
> href
> this clip doesn't work.
> Also, if the html is missing or has extra </a> it gets messy.

> Anyone got a fix for that?
> Rayellen Gilles
> MediRegs.
==SNIPPED the clip code for sake of brevity==

> If you (or anyone) could post a full example of a
> function operating on a selection I would be most grateful. I learn
> from examples and tear apart the clips I have found on the internet
> so far, but I did not find an example of working on a selection.
>
I don't know if I have any tested examples.  I'll look around and reply
again if I find one.

> By the way, what does TIS mean in your code, this maybe a stupid
> question but I have searched the Help file and could not find it and
> searching on the seperate items T or I or S gave too many hits to be
> useful. The code seems to work without it as well.
>
TIS is a set of options that apply to ^!Find and ^!Replace operations.  They
are found under those commands in the Help menu for Clip Programming.  "T"
probably isn't needed, "I" is for case independence, and "S" is for "silent"
execution, i.e., no interruptions by message boxes.

Thanks a million, Giannis.
This works great.

Roy

----- Original Message -----
From: "giannis_rho" <giannis_rho@...>
To: <ntb-clips@yahoogroups.com>
Sent: Saturday, August 28, 2004 11:39 AM
Subject: [Clip] Re: How to edit a farclip?


> --- In ntb-clips@yahoogroups.com, "Roy Herring" <roynancy@e...> wrote:
> > Is a calling clip able to initiate the editing of another clip in
> another library?
> > I would like the calling clip to initiate the editing of MyFarClip
> in SecondLib.clb.
> > Manually, I switch to SecondLib.clb, right click on MyFarClip, left
> click on EDIT CLIP.
> >
> > In the calling clip, I can switch to (SecondLib) as follows:
> >    ^!LoadLibrary C:\Program Files\NoteTab Pro\Libraries\SecondLib.
> clb
> > But I can't find a command to edit MyFarClip.
> >
> > Thanks for any help,
> > Roy
> >
> >
> Here how you can do this:
> ----------------------------------------------
> ; Show Headers in menu must be checked
> ^!Menu Tools/Clipbook Properties/Show Headers
> ^!LoadLibrary "HTML"
> ^!Keyboard Shift+Ctrl+E
> ; Loops without label
> ^!Find "HTML begin" TIS
> ^!IfError end
> ^!If ^$GetRow$=1 end
> ^!Jump select_end
> ; Go back 4 lines of code
> ^!Goto skip_-4
> -----------------------------------------------
> I hope this helps you
>
> Giannis
>
>
>
>
>
>
>
> Yahoo! Groups Links
>
>
>
>
>

I'm trying to remove a link with a button image from an HTML file.
This is the clip I've got so far but it doesn't appear to select the
text correctly before deleting it:

^!Jump Text_Start
:HTMLs
^!Clearvariables
^!Find <A HREF="http://www.whsmith.co.uk TIS
^!IfError End
^!Set %Cursor%=^$Getrow$:^$Getcol$
^!Find </A> TIS
^!SelectTo ^%Cursor%
^!InsertText ^%Empty%
^!GoTo HTMLs
:End

The links look like this, but are slightly different each time, where
the ISBN number is unique to each link:

<A HREF="http://www.whsmith.co.uk/whs/go.asp?
menu=Books&shop=2969&isbn=0747260672"><IMG SRC="icons/buy.GIF"
BORDER="0"></A>

I want all of this to disappear but to not affect anything else in
the same line. The links are inside <TH>, which are sometimes closed
but often not, ie: there isn't always a </TH>

I can't use ^!Select HTMLTag because it only selects the first tag,
ignoring the button inside the link and the </A> - hence the attempt
to find the first part of the link, then the </A> before selecting
back to the start of the link. But I'm left with the </A>. I tried
using ^!MoveCursor but that seemed to make it worse - no number would
make it select from the end of the </A>.

Thanks,
Chris.

> to find the first part of the link, then the </A> before selecting
> back to the start of the link. But I'm left with the </A>. I tried
> using ^!MoveCursor but that seemed to make it worse

^!Jump SELECT_END should do the trick - after your search for </A>.

BTW: it is safer to surround your searchstrings with quotes,
especially if a quote appears in the strng itself...

^!Find "<A HREF="http://www.whsmith.co.uk" TIS

Hugo