tim Rowledge uploaded a new version of EToys to project The Trunk: http://source.squeak.org/trunk/EToys-tpr.306.mcz
==================== Summary ====================
Name: EToys-tpr.306 Author: tpr Time: 19 September 2017, 7:02:48.372056 pm UUID: 5091afdd-f34a-4314-953b-485a827d930e Ancestors: EToys-eem.305
Fix hint & help windows for Cipher & Crostic
=============== Diff against EToys-eem.305 ===============
Item was changed: ----- Method: CipherPanel>>showHelpWindow (in category 'menu') ----- showHelpWindow + ((PluggableTextMorph new setText: 'The Cipher Panel displays an encrypted message. The encryption is a simple substitution code; each letter of the alphabet has been changed to a different one. - ((StringHolder new contents: 'The Cipher Panel displays an encrypted message. The encryption is a simple substitution code; each letter of the alphabet has been changed to a different one.
You can solve the cipher by clicking above any letter in the message, and typing the letter you think it should be. The Cipher Panel automatically makes the same substitution anywhere else that letter occurs in the encoded message.
+ If you are having trouble, you can use the command menu to ''show cipher hints''. That will display how many of each letter occurs, which is often a help in solving ciphers.' translated ) - If you are having trouble, you can use the command menu to ''show cipher hints''. That will display how many of each letter occurs, which is often a help in solving ciphers.' translated) embeddedInMorphicWindowLabeled: 'About the Cipher Panel' translated) setWindowColor: (Color r: 1.0 g: 0.6 b: 0.0); openInWorld: self world extent: 389 @ 209!
Item was changed: ----- Method: CipherPanel>>showHintsWindow (in category 'menu') ----- showHintsWindow + ((PluggableTextMorph new setText: 'Most bodies of english text follow a general pattern of letter usage. The following are the most common letters, in approximate order of frequency: - ((StringHolder new contents: 'Most bodies of english text follow a general pattern of letter usage. The following are the most common letters, in approximate order of frequency: E T A O N I R S H The following are the most common digraphs: EN ER RE NT TH ON IN
The message you are trying to decode has the following specific statistics:' translated , self cipherStats , '
Good luck!!' translated) embeddedInMorphicWindowLabeled: 'Some Useful Statistics' translated) setWindowColor: (Color r: 1.0 g: 0.6 b: 0.0); openInWorld: self world extent: 318 @ 326!
Item was changed: ----- Method: CrosticPanel>>showHelpWindow (in category 'menu') ----- showHelpWindow + ((PluggableTextMorph new setText: 'The Crostic Panel presents an acrostic puzzle for solution. As you type in answers for the clues, the letters also get entered in the text of the hidden quote. Conversely, as you guess words in the quote, those letters will fill in missing places in your answers. In addition, the first letters of all the answers together form the author''s name and title of the work from which the quote is taken. - ((StringHolder new contents: 'The Crostic Panel presents an acrostic puzzle for solution. As you type in answers for the clues, the letters also get entered in the text of the hidden quote. Conversely, as you guess words in the quote, those letters will fill in missing places in your answers. In addition, the first letters of all the answers together form the author''s name and title of the work from which the quote is taken.
If you wish to make up other acrostic puzzles, follow the obvious file format in the sampleFile method. If you wish to print an acrostic to work it on paper, then change the oldStyle method to return true, and it will properly cross-index all the cells.
Have fun.' translated) embeddedInMorphicWindowLabeled: 'About the Crostic Panel' translated) setWindowColor: (Color r: 1.0 g: 0.6 b: 0.0); openInWorld: self world extent: 409 @ 207!
Item was changed: ----- Method: CrosticPanel>>showHintsWindow (in category 'menu') ----- showHintsWindow | hints | (self confirm: 'As hints, you will be given the five longest answers. Do you really want to do this?' translated) ifFalse: [^ self]. hints := (answers sorted: [:x :y | x size > y size]) first: 5. + ((PluggableTextMorph new setText: 'The five longest answers are... - ((StringHolder new contents: 'The five longest answers are... ' translated , (String streamContents: [:strm | hints do: [:hint | strm cr; nextPutAll: (hint collect: [:i | quote at: i])]. strm cr; cr]) , 'Good luck!!' translated) embeddedInMorphicWindowLabeled: 'Crostic Hints' translated) setWindowColor: (Color r: 1.0 g: 0.6 b: 0.0); openInWorld: self world extent: 198 @ 154!