<<nobr>>
<<set $Line1 to "Full Fathom Five">>
<<set $Line1Alt to "Full Fathom Five ">>
<<set $Line2 to "from The Tempest, by William Shakespeare">>
<<set $Line2Alt to "from The Tempest by William Shakespeare">>
<<set $Line3 to "Full fathom five thy father lies;">>
<<set $Line3Alt to "Full fathom five thy father lies; ">>
<<set $Line4 to "Of his bones are coral made;">>
<<set $Line4Alt to "Of his bones are coral made; ">>
<<set $Line5 to "Those are pearls that were his eyes:">>
<<set $Line5Alt to "Those are pearls that were his eyes: ">>
<<set $Line6 to "Nothing of him that doth fade,">>
<<set $Line6Alt to "Nothing of him that doth fade, ">>
<<set $Line7 to "But doth suffer a sea-change">>
<<set $Line7Alt to "But doth suffer a sea-change ">>
<<set $Line8 to "Into something rich and strange.">>
<<set $Line8Alt to "Into something rich and strange. ">>
<<set $Line9 to "Sea-nymphs hourly ring his knell:">>
<<set $Line9Alt to "Sea-nymphs hourly ring his knell: ">>
<<set $Line10 to "Ding-dong.">>
<<set $Line10Alt to "Ding-dong. ">>
<<set $Line11 to "Hark! now I hear them—">>
<<set $Line11Alt to "Hark! now I hear them— ">>
<<set $Line12 to "Ding-dong, bell!">>
<<set $Line12Alt to "Ding-dong, bell! ">>
<</nobr>><<display Intro>><<set $Score to 0>>Welcome! Ready to [[test your memory|PlayerEntry]] of //Full Fathom Five// by William Shakespeare, from //The Tempest//?
If you want a refresher first, here’s the full poem:
Full fathom five thy father lies;
Of his bones are coral made;
Those are pearls that were his eyes:
Nothing of him that doth fade,
But doth suffer a sea-change
Into something rich and strange.
Sea-nymphs hourly ring his knell:
Ding-dong.
Hark! now I hear them—
Ding-dong, bell!<<set $Score to 0>>Fill in each line!
Title:
<<textbox "$PlayerGuessLine1" "" autofocus>>
Attribution:
<<textbox "$PlayerGuessLine2" "">>
Full poem:
<<textbox "$PlayerGuessLine3" "">>
<<textbox "$PlayerGuessLine4" "">>
<<textbox "$PlayerGuessLine5" "">>
<<textbox "$PlayerGuessLine6" "">>
<<textbox "$PlayerGuessLine7" "">>
<<textbox "$PlayerGuessLine8" "">>
<<textbox "$PlayerGuessLine9" "">>
<<textbox "$PlayerGuessLine10" "">>
<<textbox "$PlayerGuessLine11" "">>
<<textbox "$PlayerGuessLine12" "" "Grading">>
[[Check your work!|Grading]]Line 1:
<<if $PlayerGuessLine1 eq $Line1 or $PlayerGuessLine1 eq $Line1Alt>>''Correct!''<<set $Score +=1>><html><br></html>//$Line1//<<else>>''You missed this.'' It's:<html><br></html>//$Line1//<html><br></html>You had:<html><br></html><<if $PlayerGuessLine1 is "">>[NO ENTRY]<<else>>//$PlayerGuessLine1//<</if>><</if>>
Line 2:
<<if $PlayerGuessLine2 eq $Line2 or $PlayerGuessLine2 eq $Line2Alt>>''Correct!''<<set $Score +=1>><html><br></html>//$Line2//<<else>>''You missed this.'' It's:<html><br></html>//$Line2//<html><br></html>You had:<html><br></html><<if $PlayerGuessLine2 is "">>[NO ENTRY]<<else>>//$PlayerGuessLine2//<</if>><</if>>
Line 3:
<<if $PlayerGuessLine3 eq $Line3 or $PlayerGuessLine3 eq $Line3Alt>>''Correct!''<<set $Score +=1>><html><br></html>//$Line3//<<else>>''You missed this.'' It's:<html><br></html>//$Line3//<html><br></html>You had:<html><br></html><<if $PlayerGuessLine3 is "">>[NO ENTRY]<<else>>//$PlayerGuessLine3//<</if>><</if>>
Line 4:
<<if $PlayerGuessLine4 eq $Line4 or $PlayerGuessLine4 eq $Line4Alt>>''Correct!''<<set $Score +=1>><html><br></html>//$Line4//<<else>>''You missed this.'' It's:<html><br></html>//$Line4//<html><br></html>You had:<html><br></html><<if $PlayerGuessLine4 is "">>[NO ENTRY]<<else>>//$PlayerGuessLine4//<</if>><</if>>
Line 5:
<<if $PlayerGuessLine5 eq $Line5 or $PlayerGuessLine5 eq $Line5Alt>>''Correct!''<<set $Score +=1>><html><br></html>//$Line5//<<else>>''You missed this.'' It's:<html><br></html>//$Line5//<html><br></html>You had:<html><br></html><<if $PlayerGuessLine5 is "">>[NO ENTRY]<<else>>//$PlayerGuessLine5//<</if>><</if>>
Line 6:
<<if $PlayerGuessLine6 eq $Line6 or $PlayerGuessLine6 eq $Line6Alt>>''Correct!''<<set $Score +=1>><html><br></html>//$Line6//<<else>>''You missed this.'' It's:<html><br></html>//$Line6//<html><br></html>You had:<html><br></html><<if $PlayerGuessLine6 is "">>[NO ENTRY]<<else>>//$PlayerGuessLine6//<</if>><</if>>
Line 7:
<<if $PlayerGuessLine7 eq $Line7 or $PlayerGuessLine7 eq $Line7Alt>>''Correct!''<<set $Score +=1>><html><br></html>//$Line7//<<else>>''You missed this.'' It's:<html><br></html>//$Line7//<html><br></html>You had:<html><br></html><<if $PlayerGuessLine7 is "">>[NO ENTRY]<<else>>//$PlayerGuessLine7//<</if>><</if>>
Line 8:
<<if $PlayerGuessLine8 eq $Line8 or $PlayerGuessLine8 eq $Line8Alt>>''Correct!''<<set $Score +=1>><html><br></html>//$Line8//<<else>>''You missed this.'' It's:<html><br></html>//$Line8//<html><br></html>You had:<html><br></html><<if $PlayerGuessLine8 is "">>[NO ENTRY]<<else>>//$PlayerGuessLine8//<</if>><</if>>
Line 9:
<<if $PlayerGuessLine9 eq $Line9 or $PlayerGuessLine9 eq $Line9Alt>>''Correct!''<<set $Score +=1>><html><br></html>//$Line9//<<else>>''You missed this.'' It's:<html><br></html>//$Line9//<html><br></html>You had:<html><br></html><<if $PlayerGuessLine9 is "">>[NO ENTRY]<<else>>//$PlayerGuessLine9//<</if>><</if>>
Line 10:
<<if $PlayerGuessLine10 eq $Line10 or $PlayerGuessLine10 eq $Line10Alt>>''Correct!''<<set $Score +=1>><html><br></html>//$Line10//<<else>>''You missed this.'' It's:<html><br></html>//$Line10//<html><br></html>You had:<html><br></html><<if $PlayerGuessLine10 is "">>[NO ENTRY]<<else>>//$PlayerGuessLine10//<</if>><</if>>
Line 11:
<<if $PlayerGuessLine11 eq $Line11 or $PlayerGuessLine11 eq $Line11Alt>>''Correct!''<<set $Score +=1>><html><br></html>//$Line11//<<else>>''You missed this.'' It's:<html><br></html>//$Line11//<html><br></html>You had:<html><br></html><<if $PlayerGuessLine11 is "">>[NO ENTRY]<<else>>//$PlayerGuessLine11//<</if>><</if>>
Line 12:
<<if $PlayerGuessLine12 eq $Line12 or $PlayerGuessLine12 eq $Line12Alt>>''Correct!''<<set $Score +=1>><html><br></html>//$Line12//<<else>>''You missed this.'' It's:<html><br></html>//$Line12//<html><br></html>You had:<html><br></html><<if $PlayerGuessLine12 is "">>[NO ENTRY]<<else>>//$PlayerGuessLine12//<</if>><</if>>
<<set $FinalScore to (($Score / 12) * 100)>><<set $FinalScore to $FinalScore.toFixed(2)>>You got <<print $FinalScore>>% of the poem right.
[[Try again.|PlayerEntry]]
[[Refresh yourself on the full poem first.|Intro]]$Line1 ($Line2, $Line3, etc.)
Is locked in the passage VariableSetting as the respective line of the poem.
VALUE:
Locked in as respective line of poem.
$PlayerGuessLine1 ($PlayerGuessLine2, $PlayerGuessLine3, etc.)
Player's entered guess for each respective line of the poem.
VALUE:
Player-entered.
$Score
Set as 0 in the PlayerEntry passage, and then goes up by 1 for each line the player gets right.
VALUES:
Starts as 0, goes up by 1 per each line that's right.
$FinalScore
Set to the percentage of lines the player got right in the Grading passage.
VALUES
0 to 100