[Moose-dev] Re: Following the mouse cursor in Grapher

On May 20, 2015, at 12:33, Alexandre Bergel &lt;alexandre.bergel(a)me.com <mailto:alexandre.bergel@me.com>> wrote: Hi! I relaxed a bit by implementing something that was missing in Grapher. Consider the following code: -=-=-=-=-=-=-=-=-=-=-=-= b := RTGrapher new. ds := RTDataSet new. ds points: #(5 10 6 2 -2.5). b add: ds. “below is the magic line" b addDecorator: RTCursorFollower new. b -=-=-=-=-=-=-=-=-=-=-=-= This “magic line” add two bar that follows the mouse cursor. Here is a screenshot: <Screen Shot 2015-05-20 at 11.30.02 AM.png> Here is on a larger example: -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= | methods trachelMethods b ds | methods := Collection withAllSubclasses flatCollect: #rtmethods. trachelMethods := TRObject withAllSubclasses flatCollect: #rtmethods. b := RTGrapher new. b extent: 200 @ 200. "Data set 1" ds := RTDataSet new. ds interaction popup. ds dotShape circle color: (Color red alpha: 0.3). ds points: methods. ds x: #numberOfLinesOfCode. ds y: [ :m | m getSource size ]. b add: ds. "Data set 2" ds := RTDataSet new. ds interaction popup. ds dotShape circle color: (Color blue alpha: 0.3). ds points: trachelMethods. ds x: #numberOfLinesOfCode. ds y: [ :m | m getSource size ]. b add: ds. b axisX withThousandsSeparator; title: 'LOC'. b axisY noDecimal; title: 'Size'. b addDecorator: RTCursorFollower new. b build. ^ b view -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= <Screen Shot 2015-05-20 at 11.31.03 AM.png> Maybe this cursor follower should be per default in all produced chart. Any opinion? Cheers, Alexandre -- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: Alexandre Bergel http://www.bergel.eu <http://www.bergel.eu/> ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;. _______________________________________________ Moose-dev mailing list Moose-dev(a)iam.unibe.ch <mailto:Moose-dev@iam.unibe.ch> https://www.iam.unibe.ch/mailman/listinfo/moose-dev