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

Running letters

Expand Messages
  • Flo
    Hi, Isn t this a nice solution? Unfortunately, I haven t found a use for it so far... ^!Set %String%=Long live NoteTab! ^!Set %Repeat%=0 ... ^!Set
    Message 1 of 2 , Nov 23, 2007
    • 0 Attachment
      Hi,

      Isn't this a nice solution? Unfortunately, I haven't found a use for
      it so far...


      ^!Set %String%=Long live NoteTab!
      ^!Set %Repeat%=0

      :Start
      ^!Set %IndexLeft%=^$StrSize(^%String%)$
      ^!Set %IndexRight%=0

      :Loop
      ^!Set %Left%=^$StrCopyRight("^%String%";^%IndexLeft%)$
      ^!Set %Right%=^$StrCopy("^%String%";1;^%IndexRight%)$
      ^!StatusShow ^%Left% - ^%Right%
      ^!Delay 5
      ^!Dec %IndexLeft%
      ^!Inc %IndexRight%
      ^!If ^%IndexRight% <=^$StrSize(^%String%)$ Loop Else Next
      ^!Inc %Repeat%
      ^!If ^%Repeat%=3 End
      ^!Goto Start


      Enjoy!
      Flo
    • ebbtidalflats
      OOPS! I had to replace my previous post -- hope nobody tried it. Here it is again, typo corrected: When you have the answer, but not the question, you must be
      Message 2 of 2 , Nov 30, 2007
      • 0 Attachment
        OOPS!

        I had to replace my previous post -- hope nobody tried it.

        Here it is again, typo corrected:


        When you have the answer, but not the question,
        you must be in the "Jeopardy" zone.


        But as long as we're talking Jeopardy, here is another answer,
        straight from my personal clipbar. Win 2000 Monopoly Dollars,
        if ring in first, AND come up with the answer:

        ^!Set %string%=^$StrSplit("^%String%";1;1)$
        ^!Set %string%=^$StrReplace("^%nl%";"^%SPACE%";"^%String%";1;1)$

        Insert after line 1 of the code below ;)


        Eb


        --- In ntb-clips@yahoogroups.com, "Flo" <flo.gehrke@...> wrote:
        >
        > Hi,
        >
        > Isn't this a nice solution? Unfortunately, I haven't found a use for
        > it so far...
        >
        >
        > ^!Set %String%=Long live NoteTab!
        > ^!Set %Repeat%=0
        >
        > :Start
        > ^!Set %IndexLeft%=^$StrSize(^%String%)$
        > ^!Set %IndexRight%=0
        >
        > :Loop
        > ^!Set %Left%=^$StrCopyRight("^%String%";^%IndexLeft%)$
        > ^!Set %Right%=^$StrCopy("^%String%";1;^%IndexRight%)$
        > ^!StatusShow ^%Left% - ^%Right%
        > ^!Delay 5
        > ^!Dec %IndexLeft%
        > ^!Inc %IndexRight%
        > ^!If ^%IndexRight% <=^$StrSize(^%String%)$ Loop Else Next
        > ^!Inc %Repeat%
        > ^!If ^%Repeat%=3 End
        > ^!Goto Start
        >
        >
        > Enjoy!
        > Flo
        >
      Your message has been successfully submitted and would be delivered to recipients shortly.