Dear Ken & Dick,

In fact, both versions work just fine, IF the intial "startRolling" command is sent to my text field from an outside message source, such as the a button or the message box.

"send "startRolling" to fld "topic text""

But the need to use a button to get things started, kind of defeats the intuitive nature of the original concept. After all, if you need a button to start, why involve the field at all? You could just use the button to start, stop and resume the scrolling.

So, is there any way to the initiator into the field script AND to get the scrolling to stop and resume with alternate clicks?

Thanks in advance,
Alan Gayne

Subject: Re: "Rolling Credits" - Stop them and start them again
To: How to use Revolution <[email protected]>
Message-ID: <[EMAIL PROTECTED]>
Content-Type: text/plain;       charset="US-ASCII"

On 3/5/05 3:51 PM, "Alan Gayne" <[EMAIL PROTECTED]> wrote:

first click - nothing.  second click, text scrolls about 1 pixel, then
nothing.

The first click would have no effect because variable "sPaused" hasn't been
initialized as "false."


The text would not scroll further because handler "rollCredits" never sends
"rollCredits," because variable "maxscroll" hasn't been initialized, because
nothing executed "startRolling."


On 3/5/05 12:20 PM, "Ken Ray" <[EMAIL PROTECTED]> wrote:

on CancelPending pWhat
if pWhat = "" then put "all" into pWhat
switch pWhat
case "all"
repeat with x = (the number of lines of the pendingmessages) down to 1
cancel (item 1 of line x of the pendingMessages)
end repeat
break
default
repeat with x = (the number of lines of the pendingmessages) down to 1
if line x of the pendingMessages contains ("," & pWhat & ",") then
cancel (item 1 of line x of the pendingMessages)
end if
end repeat
break
end switch
end CancelPending

There's a way to do that a little simpler and faster. It's simpler because
it has no switch. It's faster because it invokes "filter" instead of testing
each line within a loop.


on cancelPendingMessages pMessageName
  -- note: empty implies cancel all pending messages
  put the pendingMessages into tPendingMessages
  if pMessageName is not empty then
    filter tPendingMessages with "*," & pMessageName & ",*"
  end if
  repeat for each line tPendingPessage in tPendingMessages
    cancel item 1 of tPendingPessage
  end repeat
end cancelPendingMessages

I hope this helps, without offending Ken.

-- Dick

_______________________________________________ use-revolution mailing list [email protected] http://lists.runrev.com/mailman/listinfo/use-revolution

Reply via email to