Isolation

"Ok, so what I would like to show you is a demonstration of thought reading, rather than mind reading and it is very important that I mention the differences between the two. The reason for this is two-fold. Firstly, I don’t want you walking away with the wrong impression about what it is that I can or can’t do. Secondly, if I ask you to create a thought in your mind, it is imperative that you do actually do this for me. Unless you create some thoughts in your mind, I have nothing to read, does that make sense?" The spectator says yes. [[Determine The Card With The Streamlined Master System (Easy)|StreamlinedStart]]

(set: $cardSuit to (either: "clubs", "hearts", "spades", "diamonds"))(set: $cardValue to (either: 2, 3, 4, 5, 6, 8, 9, 10, "J", "Q", "K"))"So, what I would like you to do now, is to think of a playing card, but please don’t pick the Ace of Spades or the Lucky Sevens because everyone goes for those. Instead, I would like you to think of a card that is unique to you!…Do you have a card in mind?" The spectator says yes [[Determine the colour using the Self Referral Technique|SelfReferral]]

Double-click this passage to edit it.

(set: $selfReferral to true)"Now, suppose for a moment that I could genuinely read your mind, if I could do that, I would simply look you straight in the eyes and tell you that you are thinking of a red card am I right?" (if: $cardSuit is "spades" or $cardSuit is "clubs")[The specator says yes "Now while you may be slightly impressed, and it may appear that I have just read your mind, it is also very easy to see how this could have been nothing more than a lucky guess, true? So for this reason alone, I would like you to change the card that you are thinking of completely... have you done that?"](else:)[The spectator says no "But, even if I was right it would be very easy to see how this could be interpreted as nothing more than a lucky guess, true? So, for this reason alone and to keep things fair, I would like you to change the card that you are thinking of, completely... have you done that?"] The spectator says yes [[Determine the possible suits using the Placement Principle|PlacementPrinciple]]

"Now, I am guessing that this is the first time that you have had your thoughts read in this fashion, so please allow me to illustrate how this is going to work. I would like you to think about the first letter of your chosen suit... can you do that?" The spectator says yes "and then, I would like you to think about its exact place within the alphabet." (if: $cardSuit is "clubs" or $cardSuit is "diamonds")[The spectator says "Ok, yes"](else:)[The spectator hesitates for a while] "...and, by exact place, I mean that I would like you to think about the letter itself, and the letters that follow it within the alphabet. You don't have to do any of this for me now though, I am just using this as an illustration of the type of thing that you will be doing in a few moment, i.e. jumping from one letter to the next in your mind." [[Determine which group to use with the Middle Letter Ploy|MiddleLetterPloy]]

"Ok, now that you understand what is expected of you, we are now ready to begin. To start, I would like you to think about the value of your card. Do you have the value of your card in mind?" The spectator says yes "Ok, in your mind I would like you to spell out this value, one letter at a time..." You pause for a moment to let the spectator do this "I think I may have picked up on something here, but I am not sure, I have a few letters in mind but I am struggling with an exact middle letter, can you focus all you attention on this letter for me, as I can't seem to get anything there" (set: $groupOne to (array: "A", 2, 6, 3, 7, 8, 10, "Q"))(if: $groupOne contains $cardValue)[The spectator does a quick positive acknowledgement](else:)[The spectator looks confused] "Don't worry about it, just spell it out one letter at a time in your mind" "Ok, stop there for a moment... now, can you call out all five vowels out loud for me, like this; A, E, I, O, U" [[Ask for an "E"|AnagramGroup1]] [[Ask for an "I"|AnagramGroup2]]

(set: $eLetters to (array: "A", 3, 5, 7, 8, 9, 10, "Q"))(set: $eMiddle to (array: 10, "Q"))"Ok, that was an E, there is an E in the value." (if: $eLetters contains $cardValue)[The specator says yes "That wasn't the middle letter, was it?" (if: $eMiddle contains $cardValue)[The spectator says yes "I thought so!"](else:)[The spectator says no "I thought not!"]](else:)[The spectator says no] "To be honest, I was struggling a little there, and I think I know why. This is problably because you are more of a creative thinker than an analytical thinker. For this reason, I am going to suggest that we try this a different way, using a more visual approach..." [[Nail the card|NailCard]]

(set: $iLetters to (array: 5, 6, 9, "K"))"Ok, that was an I, there is an I in the value." (if: $iLetters contains $cardValue)[The spectator says yes "This wasn't a high card, was it?" (if: $cardValue is "K")[The spectator says yes "I thought so!"](else:)[The spectator says no "I thought not!"]](else:)[The spectator says no] "To be honest, I was struggling a little there, and I think I know why. This is problably because you are more of a creative thinker than an analytical thinker. For this reason, I am going to suggest that we try this a different way, using a more visual approach..." [[Nail the card|NailCard]]

(set: $guessValue1 to 0, $guessValue2 to 0, $guessSuit1 to 0, $guessSuit2 to 0)"I would like you to imagine, that in my hands I have a deck of cards. Please hold out your hand, like this. Imagine , in your mind's eye, that I am going to go through the cards in an attempt to isolate the card that you are thinking of..." "I would place the... (if: $guessValue1 is 0)[|guessValue1>[ (link: "Ace")[ (set: $guessValue1 to 'A') (replace: ?guessValue1)[Ace] (if: $guessSuit1 is not 0 and $guessValue1 is not 0)[ (if: $guessSuit1 is $cardSuit and $guessValue1 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?secondGuess) ] ] ] (link: "Two")[ (set: $guessValue1 to 2) (replace: ?guessValue1)[Two] (if: $guessSuit1 is not 0 and $guessValue1 is not 0)[ (if: $guessSuit1 is $cardSuit and $guessValue1 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?secondGuess) ] ] ] (link: "Three")[ (set: $guessValue1 to 3) (replace: ?guessValue1)[Three] (if: $guessSuit1 is not 0 and $guessValue1 is not 0)[ (if: $guessSuit1 is $cardSuit and $guessValue1 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?secondGuess) ] ] ] (link: "Four")[ (set: $guessValue1 to 4) (replace: ?guessValue1)[Four] (if: $guessSuit1 is not 0 and $guessValue1 is not 0)[ (if: $guessSuit1 is $cardSuit and $guessValue1 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?secondGuess) ] ] ] (link: "Five")[ (set: $guessValue1 to 5) (replace: ?guessValue1)[Five] (if: $guessSuit1 is not 0 and $guessValue1 is not 0)[ (if: $guessSuit1 is $cardSuit and $guessValue1 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?secondGuess) ] ] ] (link: "Six")[ (set: $guessValue1 to 6) (replace: ?guessValue1)[Six] (if: $guessSuit1 is not 0 and $guessValue1 is not 0)[ (if: $guessSuit1 is $cardSuit and $guessValue1 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?secondGuess) ] ] ] (link: "Seven")[ (set: $guessValue1 to 7) (replace: ?guessValue1)[Seven] (if: $guessSuit1 is not 0 and $guessValue1 is not 0)[ (if: $guessSuit1 is $cardSuit and $guessValue1 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?secondGuess) ] ] ] (link: "Eight")[ (set: $guessValue1 to 8) (replace: ?guessValue1)[Eight] (if: $guessSuit1 is not 0 and $guessValue1 is not 0)[ (if: $guessSuit1 is $cardSuit and $guessValue1 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?secondGuess) ] ] ] (link: "Nine")[ (set: $guessValue1 to 9) (replace: ?guessValue1)[Nine] (if: $guessSuit1 is not 0 and $guessValue1 is not 0)[ (if: $guessSuit1 is $cardSuit and $guessValue1 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?secondGuess) ] ] ] (link: "Ten")[ (set: $guessValue1 to 10) (replace: ?guessValue1)[Ten] (if: $guessSuit1 is not 0 and $guessValue1 is not 0)[ (if: $guessSuit1 is $cardSuit and $guessValue1 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?secondGuess) ] ] ] (link: "Jack")[ (set: $guessValue1 to "J") (replace: ?guessValue1)[Jack] (if: $guessSuit1 is not 0 and $guessValue1 is not 0)[ (if: $guessSuit1 is $cardSuit and $guessValue1 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?secondGuess) ] ] ] (link: "Queen")[ (set: $guessValue1 to "Q") (replace: ?guessValue1)[Queen] (if: $guessSuit1 is not 0 and $guessValue1 is not 0)[ (if: $guessSuit1 is $cardSuit and $guessValue1 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?secondGuess) ] ] ] (link: "King")[ (set: $guessValue1 to "K") (replace: ?guessValue1)[King] (if: $guessSuit1 is not 0 and $guessValue1 is not 0)[ (if: $guessSuit1 is $cardSuit and $guessValue1 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?secondGuess) ] ] ]]] of (if: $guessSuit1 is 0)[|guessSuit1>[ (link: "Clubs")[ (set: $guessSuit1 to 'clubs') (replace: ?guessSuit1)[Clubs] (if: $guessSuit1 is not 0 and $guessValue1 is not 0)[ (if: $guessSuit1 is $cardSuit and $guessValue1 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?secondGuess) ] ] ] (link: "Hearts")[ (set: $guessSuit1 to 'hearts') (replace: ?guessSuit1)[Hearts] (if: $guessSuit1 is not 0 and $guessValue1 is not 0)[ (if: $guessSuit1 is $cardSuit and $guessValue1 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?secondGuess) ] ] ] (link: "Spades")[ (set: $guessSuit1 to 'spades') (replace: ?guessSuit1)[Spades] (if: $guessSuit1 is not 0 and $guessValue1 is not 0)[ (if: $guessSuit1 is $cardSuit and $guessValue1 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?secondGuess) ] ] ] (link: "Diamonds")[ (set: $guessSuit1 to 'diamonds') (replace: ?guessSuit1)[Diamonds] (if: $guessSuit1 is not 0 and $guessValue1 is not 0)[ (if: $guessSuit1 is $cardSuit and $guessValue1 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?secondGuess) ] ] ]]] on your hand..." |secondGuess)[The spectator says nothing "Followed by the W, and the X, and the Y and the Z, followed by all the remaining cards until there is only one remaining..." "Now, this is the most important part of this whole exercise. I would like you now to imagine that the single card that I am holding, is the very card that you are thinking of. In a moment, I will mime turning this card to face you, and at the very moment I do this, I would like you, as crystal clear as you can, to imagine that you see the card that you are thinking of, in my hand... ...In theory, providing you do this correctly, I sould be able to intercept that thought the moment that you create it, and all being well, I sould be able to tell you the card you are thinking of.. ...Ready? ...three...two...one... The (if: $guessValue2 is 0)[|guessValue2>[ (link: "Ace")[ (set: $guessValue2 to 'A') (replace: ?guessValue2)[Ace] (if: $guessSuit2 is not 0 and $guessValue2 is not 0)[ (if: $guessSuit2 is $cardSuit and $guessValue2 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?incorrectGuess) ] ] ] (link: "Two")[ (set: $guessValue2 to 2) (replace: ?guessValue2)[Two] (if: $guessSuit2 is not 0 and $guessValue2 is not 0)[ (if: $guessSuit2 is $cardSuit and $guessValue2 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?incorrectGuess) ] ] ] (link: "Three")[ (set: $guessValue2 to 3) (replace: ?guessValue2)[Three] (if: $guessSuit2 is not 0 and $guessValue2 is not 0)[ (if: $guessSuit2 is $cardSuit and $guessValue2 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?incorrectGuess) ] ] ] (link: "Four")[ (set: $guessValue2 to 4) (replace: ?guessValue2)[Four] (if: $guessSuit2 is not 0 and $guessValue2 is not 0)[ (if: $guessSuit2 is $cardSuit and $guessValue2 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?incorrectGuess) ] ] ] (link: "Five")[ (set: $guessValue2 to 5) (replace: ?guessValue2)[Five] (if: $guessSuit2 is not 0 and $guessValue2 is not 0)[ (if: $guessSuit2 is $cardSuit and $guessValue2 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?incorrectGuess) ] ] ] (link: "Six")[ (set: $guessValue2 to 6) (replace: ?guessValue2)[Six] (if: $guessSuit2 is not 0 and $guessValue2 is not 0)[ (if: $guessSuit2 is $cardSuit and $guessValue2 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?incorrectGuess) ] ] ] (link: "Seven")[ (set: $guessValue2 to 7) (replace: ?guessValue2)[Seven] (if: $guessSuit2 is not 0 and $guessValue2 is not 0)[ (if: $guessSuit2 is $cardSuit and $guessValue2 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?incorrectGuess) ] ] ] (link: "Eight")[ (set: $guessValue2 to 8) (replace: ?guessValue2)[Eight] (if: $guessSuit2 is not 0 and $guessValue2 is not 0)[ (if: $guessSuit2 is $cardSuit and $guessValue2 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?incorrectGuess) ] ] ] (link: "Nine")[ (set: $guessValue2 to 9) (replace: ?guessValue2)[Nine] (if: $guessSuit2 is not 0 and $guessValue2 is not 0)[ (if: $guessSuit2 is $cardSuit and $guessValue2 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?incorrectGuess) ] ] ] (link: "Ten")[ (set: $guessValue2 to 10) (replace: ?guessValue2)[Ten] (if: $guessSuit2 is not 0 and $guessValue2 is not 0)[ (if: $guessSuit2 is $cardSuit and $guessValue2 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?incorrectGuess) ] ] ] (link: "Jack")[ (set: $guessValue2 to "J") (replace: ?guessValue2)[Jack] (if: $guessSuit2 is not 0 and $guessValue2 is not 0)[ (if: $guessSuit2 is $cardSuit and $guessValue2 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?incorrectGuess) ] ] ] (link: "Queen")[ (set: $guessValue2 to "Q") (replace: ?guessValue2)[Queen] (if: $guessSuit2 is not 0 and $guessValue2 is not 0)[ (if: $guessSuit2 is $cardSuit and $guessValue2 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?incorrectGuess) ] ] ] (link: "King")[ (set: $guessValue2 to "K") (replace: ?guessValue2)[King] (if: $guessSuit2 is not 0 and $guessValue2 is not 0)[ (if: $guessSuit2 is $cardSuit and $guessValue2 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?incorrectGuess) ] ] ]]] of (if: $guessSuit2 is 0)[|guessSuit2>[ (link: "Clubs")[ (set: $guessSuit2 to 'clubs') (replace: ?guessSuit2)[Clubs] (if: $guessSuit2 is not 0 and $guessValue2 is not 0)[ (if: $guessSuit2 is $cardSuit and $guessValue2 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?incorrectGuess) ] ] ] (link: "Hearts")[ (set: $guessSuit2 to 'hearts') (replace: ?guessSuit2)[Hearts] (if: $guessSuit2 is not 0 and $guessValue2 is not 0)[ (if: $guessSuit2 is $cardSuit and $guessValue2 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?incorrectGuess) ] ] ] (link: "Spades")[ (set: $guessSuit2 to 'spades') (replace: ?guessSuit2)[Spades] (if: $guessSuit2 is not 0 and $guessValue2 is not 0)[ (if: $guessSuit2 is $cardSuit and $guessValue2 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?incorrectGuess) ] ] ] (link: "Diamonds")[ (set: $guessSuit2 to 'diamonds') (replace: ?guessSuit2)[Diamonds] (if: $guessSuit2 is not 0 and $guessValue2 is not 0)[ (if: $guessSuit2 is $cardSuit and $guessValue2 is $cardValue)[ (show:?correctGuess) ] (else:)[ (show:?incorrectGuess) ] ] ]]]] |correctGuess)[The spectator confirms that this is their card. Congratulations! (link:"(Play Again)")[(goto:"IsolationStart")]] |incorrectGuess)[The spectator says no. You have failed to get the correct card! (link:"(Play Again)")[(goto:"IsolationStart")]]