Hello Genevieve Young
OK, it�s a joke, but if you have nothing more interesting to do (when it
rains...)
suppose you want to explain (in a pseudocode way) what a script means...
1/ make a field named �test� where you will type something like this or
everything you want to translate:
on mouseUp
beep
end
--
1bis/ make an other field named �pseudocode�
2/ create a button which script would be:
on mouseup
myscript =the text of member "test"
the text of field "pseudocode" = pseudoCode (myscript)
end
3/ create a handler:
on pseudocode (myscript)
testAll = the number of lines of myscript
myresult = ""
repeat with i = 1 to testAll
mywords = line i of myscript
case (true) of
(mywords contains "mouseup"):
myresult = myresult & "When you release your finger" & return
(mywords contains "mouseDown"):
myresult = myresult & "When you press the mouse" & return
(mywords contains "beep"):
myresult = myresult & "That rings..." & return
(mywords contains "end"):
myresult =myresult & "That�s all folks!" & return
-- a LOT of things here!
otherwise
if mywords <> "" then myresult =myresult & "??????" & return
end case
end repeat
return (myresult)
end pseudocode
Sorry for that stupid thing but anyway, why not from time to time make the
"corpus" bigger?
regards
jean-louis valero
[To remove yourself from this list, or to change to digest mode, go to
http://www.penworks.com/LUJ/lingo-l.cgi To post messages to the list,
email [EMAIL PROTECTED] (Problems, email [EMAIL PROTECTED])
Lingo-L is for learning and helping with programming Lingo. Thanks!]
