I want to take this script, and place in online, so that anyone can use it, not necessarily mac based users.
it is a ‘magical’ mind reading script, the ‘spectator’ thinks of any card in a normal deck, and the script figures out what it is.
but I would like for it to be able to be online.
any help is greatly appreciated.
-Nathan
property cardList : {"King", "Ace", "Two", "Three", "Four", "Five", "Six", "Seven", "Eight", "Nine", "Ten", "Jack", "Queen", "--You cheated, it wasn't in all four!"}
property colorList : {"Heart", "Diamond", "Spade", "Club"}
property questionList : {"Is the rank of your card equal to any of these? 3, Jack, 5, Ace, 9, 7?", "Ok, how about these? 10, 3, 6, 2, 7, Jack?", "Almost done, how about these? 5, Queen, 6, 7, 4?", "Last round: Queen, 9, 8, Jack, 10"}
repeat
display dialog "Think of any playing card in a normal deck...
And for the moment, just forget about the suit, and the color of your card. Only think of the number or letter."
set theResult to 0
repeat with i from 1 to 4
set b to button returned of (display dialog item i of questionList buttons {"No", "Yes"})
if b is "Yes" then set theResult to (theResult + (2 ^ (i - 1))) as integer
end repeat
try
set theResult to item (theResult + 1) of cardList
exit repeat
on error
display dialog "--You cheated, it wasn't in all four!" buttons {"Cancel", "Try Again"} default button 2
end try
end repeat
--figure out the color
display dialog "Great, now I want you to remember the color of your card. Imagine it bright and vivid in your mind."
if button returned of result is "OK" then
display dialog "Ok, I am getting something, does the word 'cherry' mean anything to you?" buttons ["Nope", "Yes, it does"]
if button returned of result is "Yes, it does" then
set theColor to 1 -- "red"
else
set theColor to 3 -- "black"
display dialog "Oh.. well I meant 'Black Cherry', we'll move on."
end if
end if
display dialog "Your card is a " & item theColor of colorList & " correct?" buttons ["No, its not", "Yes, it is"]
if button returned of result is "Yes, it is" then
display dialog "I thought so, you're thinking of the " & theResult & " of " & item theColor of colorList & "s." buttons {"Have a great day!"} default button 1
else
display dialog "Oh, well I sometimes have trouble with the " & theResult & " of " & item (theColor + 1) of colorList & "s." buttons {"Have a great day!"} default button 1
end if