David T. Lewis uploaded a new version of EToys to project The Trunk: http://source.squeak.org/trunk/EToys-dtl.505.mcz
==================== Summary ====================
Name: EToys-dtl.505 Author: dtl Time: 4 November 2023, 9:25:22.422109 pm UUID: fefadd9f-dd49-4f69-9c5e-b006efb47f7a Ancestors: EToys-dtl.504
Method category cleanups based on Marcel's unload-etoys.33.cs Etoys removal script. Reference squeak-dev 29-Aug-2023 Let's discuss the future of Etoys in Squeak 6.1 (and beyond)
=============== Diff against EToys-mt.503 ===============
Item was changed: SystemOrganization addCategory: #'Etoys-Buttons'! SystemOrganization addCategory: #'Etoys-CustomEvents'! SystemOrganization addCategory: #'Etoys-Experimental'! SystemOrganization addCategory: #'Etoys-OLPC-Display'! SystemOrganization addCategory: #'Etoys-Outliner'! SystemOrganization addCategory: #'Etoys-Protocols'! SystemOrganization addCategory: #'Etoys-Protocols-Type Vocabularies'! SystemOrganization addCategory: #'Etoys-ReleaseBuilder'! SystemOrganization addCategory: #'Etoys-Scripting'! SystemOrganization addCategory: #'Etoys-Scripting Support'! SystemOrganization addCategory: #'Etoys-Scripting Tiles'! SystemOrganization addCategory: #'Etoys-Squeakland-EToys-Kedama'! SystemOrganization addCategory: #'Etoys-Squeakland-Etoys-Buttons'! SystemOrganization addCategory: #'Etoys-Squeakland-Etoys-Calendar'! SystemOrganization addCategory: #'Etoys-Squeakland-Etoys-Debugger'! SystemOrganization addCategory: #'Etoys-Squeakland-Etoys-Help'! SystemOrganization addCategory: #'Etoys-Squeakland-Etoys-Input'! SystemOrganization addCategory: #'Etoys-Squeakland-Etoys-Scripting'! SystemOrganization addCategory: #'Etoys-Squeakland-Etoys-Scripting Support'! SystemOrganization addCategory: #'Etoys-Squeakland-Etoys-Scripting Tiles'! SystemOrganization addCategory: #'Etoys-Squeakland-Etoys-SpeechBubbles'! SystemOrganization addCategory: #'Etoys-Squeakland-Etoys-Tile Scriptors'! SystemOrganization addCategory: #'Etoys-Squeakland-Graphics-Text'! SystemOrganization addCategory: #'Etoys-Squeakland-Graphics-Tools-Intersection'! SystemOrganization addCategory: #'Etoys-Squeakland-Graphics-Tools-Simplification'! SystemOrganization addCategory: #'Etoys-Squeakland-Graphics-Tools-Triangulation'! SystemOrganization addCategory: #'Etoys-Squeakland-Morphic-Basic'! SystemOrganization addCategory: #'Etoys-Squeakland-Morphic-Books'! SystemOrganization addCategory: #'Etoys-Squeakland-Morphic-Components'! SystemOrganization addCategory: #'Etoys-Squeakland-Morphic-Demo'! SystemOrganization addCategory: #'Etoys-Squeakland-Morphic-Experimental'! SystemOrganization addCategory: #'Etoys-Squeakland-Morphic-Games'! SystemOrganization addCategory: #'Etoys-Squeakland-Morphic-Games-Chess'! SystemOrganization addCategory: #'Etoys-Squeakland-Morphic-Games-Chess960'! SystemOrganization addCategory: #'Etoys-Squeakland-Morphic-GeeMail'! SystemOrganization addCategory: #'Etoys-Squeakland-Morphic-Kernel'! SystemOrganization addCategory: #'Etoys-Squeakland-Morphic-Mentoring'! SystemOrganization addCategory: #'Etoys-Squeakland-Morphic-Navigators'! SystemOrganization addCategory: #'Etoys-Squeakland-Morphic-PDA'! SystemOrganization addCategory: #'Etoys-Squeakland-Morphic-PartsBin'! SystemOrganization addCategory: #'Etoys-Squeakland-Morphic-Support'! SystemOrganization addCategory: #'Etoys-Squeakland-Morphic-Widgets'! SystemOrganization addCategory: #'Etoys-Squeakland-Morphic-Windows'! SystemOrganization addCategory: #'Etoys-Squeakland-Morphic-Worlds'! SystemOrganization addCategory: #'Etoys-Squeakland-MorphicExtras-AdditionalMorphs'! SystemOrganization addCategory: #'Etoys-Squeakland-MorphicExtras-Charts'! SystemOrganization addCategory: #'Etoys-Squeakland-MorphicExtras-Postscript Filters'! SystemOrganization addCategory: #'Etoys-Squeakland-MorphicExtras-Widgets'! SystemOrganization addCategory: #'Etoys-Squeakland-Network-HTML-Formatter'! SystemOrganization addCategory: #'Etoys-Squeakland-Network-HTML-Forms'! SystemOrganization addCategory: #'Etoys-Squeakland-Network-HTML-Parser'! SystemOrganization addCategory: #'Etoys-Squeakland-Network-HTML-Parser Entities'! SystemOrganization addCategory: #'Etoys-Squeakland-Network-HTML-Tokenizer'! SystemOrganization addCategory: #'Etoys-Squeakland-Network-MIME'! SystemOrganization addCategory: #'Etoys-Squeakland-Network-TelNet WordNet'! SystemOrganization addCategory: #'Etoys-Squeakland-Network-UI'! SystemOrganization addCategory: #'Etoys-Squeakland-Network-Url'! SystemOrganization addCategory: #'Etoys-Squeakland-SISS-Serialization'! SystemOrganization addCategory: #'Etoys-Squeakland-ST80-Morphic'! SystemOrganization addCategory: #'Etoys-Squeakland-SUnit'! SystemOrganization addCategory: #'Etoys-Squeakland-Sound-Interface'! SystemOrganization addCategory: #'Etoys-Squeakland-Sound-Ogg'! SystemOrganization addCategory: #'Etoys-Squeakland-Sound-Scores'! SystemOrganization addCategory: #'Etoys-Squeakland-Sugar'! SystemOrganization addCategory: #'Etoys-Squeakland-Support'! SystemOrganization addCategory: #'Etoys-Squeakland-System-Clipboard-Extended'! SystemOrganization addCategory: #'Etoys-Squeakland-System-Compiler'! SystemOrganization addCategory: #'Etoys-Squeakland-System-Exceptions Kernel'! SystemOrganization addCategory: #'Etoys-Squeakland-System-Support'! SystemOrganization addCategory: #'Etoys-Squeakland-Tools-Changes'! SystemOrganization addCategory: #'Etoys-Squeakland-Tools-Explorer'! - SystemOrganization addCategory: #'Etoys-Squeakland-Tools-Process Browser'! SystemOrganization addCategory: #'Etoys-Squeakland-Tweak-Kedama-ObjectVectors'! SystemOrganization addCategory: #'Etoys-Squeakland-Tweak-Kedama-ParseTree-AttributeDefinition'! SystemOrganization addCategory: #'Etoys-Squeakland-Tweak-Kedama-ParseTreeTransformer'! SystemOrganization addCategory: #'Etoys-Stacks'! SystemOrganization addCategory: #'Etoys-StarSqueak'! SystemOrganization addCategory: #'Etoys-Support'! SystemOrganization addCategory: #'Etoys-Tests'! SystemOrganization addCategory: #'Etoys-Tile Scriptors'! SystemOrganization addCategory: #'Etoys-UserInterfaceTheme'! SystemOrganization addCategory: #'Etoys-Widgets'! SystemOrganization addCategory: #'Etoys-Help'!
Item was changed: + ----- Method: ChessMorph>>step (in category 'stepping') ----- - ----- Method: ChessMorph>>step (in category 'stepping and presenter') ----- step | move | board searchAgent isThinking ifTrue:[ move := board searchAgent thinkStep. move ifNotNil:[ animateMove := true. board movePieceFrom: move sourceSquare to: move destinationSquare]. ] ifFalse:[ autoPlay ifTrue:[board searchAgent startThinking]. ].!
Item was removed: - StandardSystemController subclass: #DeferredActionStandardSystemController - instanceVariableNames: 'queue' - classVariableNames: '' - poolDictionaries: '' - category: 'Etoys-Squeakland-Tools-Process Browser'! - - !DeferredActionStandardSystemController commentStamp: '<historical>' prior: 0! - This is a StandardSystemController that can queue up objects to be evaluated before its control loop.!
Item was removed: - ----- Method: DeferredActionStandardSystemController>>addDeferredUIMessage: (in category 'as yet unclassified') ----- - addDeferredUIMessage: valuableObject - queue nextPut: valuableObject!
Item was removed: - ----- Method: DeferredActionStandardSystemController>>controlActivity (in category 'as yet unclassified') ----- - controlActivity - [queue isEmpty] - whileFalse: [queue next value]. - ^super controlActivity!
Item was removed: - ----- Method: DeferredActionStandardSystemController>>initialize (in category 'as yet unclassified') ----- - initialize - super initialize. - queue := SharedQueue new.!
Item was changed: + ----- Method: ImageMorphWithSpotlight>>step (in category 'stepping') ----- - ----- Method: ImageMorphWithSpotlight>>step (in category 'stepping and presenter') ----- step | cp | ((self bounds expandBy: spotBuffer extent // 2) containsPoint: (cp := self cursorPoint)) ifTrue: [(cp - (spotBuffer extent // 2)) = spotBuffer offset ifTrue: [^ self]. "No change" "Cursor has moved where its spotShape is visible" spotOn := true. self spotChanged. spotBuffer offset: cp - (spotBuffer extent // 2). self spotChanged. (BitBlt current toForm: spotBuffer) "clear the buffer" fill: spotBuffer boundingBox fillColor: (Bitmap with: 0) rule: Form over; "Clip anything outside the base form" clipRect: (spotBuffer boundingBox intersect: (self bounds translateBy: spotBuffer offset negated)); "Fill the spotBuffer with the spot image" copyForm: spotImage to: self position - spotBuffer offset rule: Form over; "Mask everything outside the spot shape to 0 (transparent)." copyForm: spotShape to: spotShape offset negated rule: Form and colorMap: (Bitmap with: 0 with: 16rFFFFFFFF)] ifFalse: [spotOn ifTrue: [self spotChanged. spotOn := false]]!
Item was changed: + ----- Method: InfoStringMorph>>step (in category 'stepping') ----- - ----- Method: InfoStringMorph>>step (in category 'stepping and presenter') ----- step self contents: block value asString!
Item was changed: + ----- Method: MinesBoard>>step (in category 'stepping') ----- - ----- Method: MinesBoard>>step (in category 'stepping and presenter') ----- step
flashCount = 0 ifFalse: [ self submorphsDo: [:m | m color: m color negated.]. flashCount := flashCount - 1. ]. !
Item was changed: + ----- Method: MorphExample>>step (in category 'stepping') ----- - ----- Method: MorphExample>>step (in category 'stepping and presenter') ----- step phase := phase\8 + 1. phase = 1 ifTrue: [^ ball delete]. phase < 4 ifTrue:[^self]. phase = 4 ifTrue: [self addMorph: ball]. ball align: ball center with: (star vertices at: (phase-3*2)).!
Item was changed: + ----- Method: SameGameBoard>>step (in category 'stepping') ----- - ----- Method: SameGameBoard>>step (in category 'stepping and presenter') ----- step
| newColor | selection ifNotNil: [newColor := flash ifTrue: [selectionColor] ifFalse: [flashColor]. selection do: [:loc | (self tileAt: loc) color: newColor]. flash := flash not] !
Item was changed: + ----- Method: SpectrumAnalyzerMorph>>start (in category 'stepping') ----- - ----- Method: SpectrumAnalyzerMorph>>start (in category 'stepping and presenter') ----- start "Start displaying sound data."
displayType = 'signal' ifTrue: [soundInput bufferSize: graphMorph width - (2 * graphMorph borderWidth)] ifFalse: [soundInput bufferSize: fft n]. soundInput startRecording. !
Item was changed: + ----- Method: SpectrumAnalyzerMorph>>step (in category 'stepping') ----- - ----- Method: SpectrumAnalyzerMorph>>step (in category 'stepping and presenter') ----- step "Update the record light, level meter, and display."
| w | "update the record light and level meter" statusLight color: (soundInput isRecording ifTrue: [Color yellow] ifFalse: [Color gray]). statusLight firstSubmorph in: [:stringMorph | stringMorph contents: (soundInput isRecording ifTrue: ['On' translated] ifFalse: ['Off' translated]). stringMorph position: statusLight center - (stringMorph extent // 2)]. w := ((121 px * soundInput meterLevel) // 100) max: 1. levelMeter width: w. "update the display if any data is available" self updateDisplay.!
Item was changed: + ----- Method: SpectrumAnalyzerMorph>>stop (in category 'stepping') ----- - ----- Method: SpectrumAnalyzerMorph>>stop (in category 'stepping and presenter') ----- stop "Stop displaying sound data."
soundInput stopRecording. !
Item was changed: + ----- Method: SpectrumAnalyzerMorph>>stopStepping (in category 'stepping') ----- - ----- Method: SpectrumAnalyzerMorph>>stopStepping (in category 'stepping and presenter') ----- stopStepping "Turn off recording."
super stopStepping. soundInput stopRecording. !
Item was changed: + ----- Method: TetrisBoard>>step (in category 'stepping') ----- - ----- Method: TetrisBoard>>step (in category 'stepping and presenter') ----- step
(self ownerThatIsA: HandMorph) ifNotNil: [^self]. paused ifTrue: [^ self]. currentBlock ifNil: [ currentBlock := TetrisBlock new. self addMorphFront: currentBlock. currentBlock board: self. ] ifNotNil: [ currentBlock dropByOne ifFalse: [self storePieceOnBoard] ]. !
Item was changed: + ----- Method: WatchMorph>>step (in category 'stepping') ----- - ----- Method: WatchMorph>>step (in category 'stepping and presenter') ----- step
self changed.!
packages@lists.squeakfoundation.org