Your browser lacks required capabilities. Please upgrade it or switch to another to continue.
Loading…
<<nobr>>
<<set $Line1 to "O Rose thou art sick.">>
<<set $Line1Alt to "O Rose thou art sick. ">>
<<set $Line2 to "The invisible worm,">>
<<set $Line2Alt to "The invisible worm,">>
<<set $Line3 to "That flies in the night">>
<<set $Line3Alt to "That flies in the night">>
<<set $Line4 to "In the howling storm:">>
<<set $Line4Alt to "In the howling storm:">>
<<set $Line5 to "Has found out thy bed">>
<<set $Line5Alt to "Has found out thy bed">>
<<set $Line6 to "Of crimson joy:">>
<<set $Line6Alt to "Of crimson joy:">>
<<set $Line7 to "And his dark secret love">>
<<set $Line7Alt to "And his dark secret love">>
<<set $Line8 to "Does thy life destroy.">>
<<set $Line8Alt to "Does thy life destroy. ">>
<</nobr>><<display Intro>>Welcome! Ready to [[test your memory|PlayerEntry]] of //The Sick Rose// by William Blake?
If you want a refresher first, here’s the full poem:
O Rose thou art sick.
The invisible worm,
That flies in the night
In the howling storm:
Has found out thy bed
Of crimson joy:
And his dark secret love
Does thy life destroy.<<set $Score to 0>>Fill in each line!
<<textbox "$PlayerGuessLine1" "" autofocus>>
<<textbox "$PlayerGuessLine2" "">>
<<textbox "$PlayerGuessLine3" "">>
<<textbox "$PlayerGuessLine4" "">>
<<textbox "$PlayerGuessLine5" "">>
<<textbox "$PlayerGuessLine6" "">>
<<textbox "$PlayerGuessLine7" "">>
<<textbox "$PlayerGuessLine8" "" "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>>
<<set $FinalScore to (($Score / 8) * 100)>>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