[Moose-dev] Re: [Pharo-dev] Re: GanttChartMorph openOn: aCollectionOfActivities ?

-- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: Alexandre Bergel http://www.bergel.eu ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;. > On Jul 30, 2015, at 2:25 PM, H. Hirzel hannes.hirzel@gmail.com wrote: > > Which menu? Could you describe it verbally please where to click? The > picture did not come through. > > --Hannes > > On 7/30/15, Alexandre Bergel alexandre.bergel@me.com wrote: >> Simply use the menu: >> >> >> Cheers, >> Alexandre >> >> -- >> _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: >> Alexandre Bergel http://www.bergel.eu >> ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;. >> >> >> >>> On Jul 30, 2015, at 11:59 AM, H. Hirzel hannes.hirzel@gmail.com wrote: >>> >>> Alexandre, >>> >>> This is really agile ... version 1005 of Roassal loaded and version >>> 305 of Trachel :-) >>> >>> The GANTT chart works fine, see screen shot. >>> >>> How do I export it as SVG code in Roassal? >>> >>> --Hannes >>> >>> On 7/29/15, Alexandre Bergel alexandre.bergel@me.com wrote: >>>> Pure agile development: the latest version is the one that count. >>>> You need to update two packages: Roassal2 and Trachel. >>>> >>>> Cheers, >>>> Alexandre >>>> -- >>>> _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: >>>> Alexandre Bergel http://www.bergel.eu >>>> ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;. >>>> >>>> >>>> >>>>> On Jul 29, 2015, at 3:24 PM, H. Hirzel hannes.hirzel@gmail.com wrote: >>>>> >>>>> Or a configuration? Which one? >>>>> >>>>> --HH >>>>> >>>>> On 7/29/15, H. Hirzel hannes.hirzel@gmail.com wrote: >>>>>> Thanks for the updated GANTT script. >>>>>> >>>>>> My question was about the version of Roassal to load. >>>>>> >>>>>> Which one? >>>>>> I just go for version 1000? >>>>>> >>>>>> See screenshot. >>>>>> >>>>>> --Hannes >>>>>> >>>>>> On 7/29/15, Alexandre Bergel alexandre.bergel@me.com wrote: >>>>>>>>> You should load the latest Roassal. >>>>>>>> >>>>>>>> How do I do that? I just loaded Roassal into a fresh Pharo4.0 image >>>>>>>> and RTTimeLine is not included. >>>>>>> >>>>>>> We did some refactoring. >>>>>>> Instead, you should do: >>>>>>> >>>>>>> -=-=-=-=-=-=-=-= >>>>>>> data := #(#(WP1 0 5) #(WP2 5 8) #(WP3 7 10)). >>>>>>> >>>>>>> b := RTTimeline new. >>>>>>> >>>>>>> s := RTTimelineSet new. >>>>>>> s objects: data. >>>>>>> s lineIdentifier: #first. >>>>>>> s start: #second. >>>>>>> s end: #third. >>>>>>> b add: s. >>>>>>> >>>>>>> b axisX >>>>>>> numberOfLabels: 5; >>>>>>> labelRotation: -45; >>>>>>> labelConversion: [ :v | Date year: 2015 day: v ]. >>>>>>> >>>>>>> d := RTVerticalTickLineDecorator new. >>>>>>> d shape line color: Color white. >>>>>>> b addDecorator: d. >>>>>>> b >>>>>>> -=-=-=-=-=-=-=-= >>>>>>> >>>>>>> >>>>>>> >>>>>>> The class RTTimelineExample contains many examples >>>>>>> >>>>>>> Let us know how it goes >>>>>>> >>>>>>> Alexandre >>>>>>> >>>>>>>> >>>>>>>> >>>>>>>>> Alexandre >>>>>>>>> >>>>>>>>> >>>>>>>>> >>>>>>>>>> Le 9 mai 2015 à 19:06, H. Hirzel hannes.hirzel@gmail.com a écrit >>>>>>>>>> : >>>>>>>>>> >>>>>>>>>> Thank you for the examples, Alexandre! >>>>>>>>>> >>>>>>>>>> I have Pharo 4.0 with Roassal 2.0 installed (AlexandreBergel.718) >>>>>>>>>> >>>>>>>>>> I paste the following into a 'Playground' window and 'do it'. >>>>>>>>>> >>>>>>>>>> b := RTTimeLine new. >>>>>>>>>> >>>>>>>>>> b addEntry: (RTTimeLineEntry new identifier: #WP1; start: 0; end: >>>>>>>>>> 5). >>>>>>>>>> b addEntry: (RTTimeLineEntry new identifier: #WP2; start: 5; end: >>>>>>>>>> 8). >>>>>>>>>> b addEntry: (RTTimeLineEntry new identifier: #WP3; start: 7; end: >>>>>>>>>> 10). >>>>>>>>>> >>>>>>>>>> b axisX numberOfLabels: 5. >>>>>>>>>> b >>>>>>>>>> >>>>>>>>>> I get the error message that RTTimeLine is not known. >>>>>>>>>> >>>>>>>>>> What am I missing? >>>>>>>>>> >>>>>>>>>> --Hannes >>>>>>>>>> >>>>>>>>>> >>>>>>>>>>> On 5/8/15, Alexandre Bergel alexandre.bergel@me.com wrote: >>>>>>>>>>> Hi Hannes! >>>>>>>>>>> >>>>>>>>>>> Here is a first shoot paired-programmed with Juraj using Roassal: >>>>>>>>>>> >>>>>>>>>>> -=-=-=-=-=-=-=-=-=-=-=-= >>>>>>>>>>> b := RTTimeLine new. >>>>>>>>>>> >>>>>>>>>>> b addEntry: (RTTimeLineEntry new identifier: #WP1; start: 0; end: >>>>>>>>>>> 5). >>>>>>>>>>> b addEntry: (RTTimeLineEntry new identifier: #WP2; start: 5; end: >>>>>>>>>>> 8). >>>>>>>>>>> b addEntry: (RTTimeLineEntry new identifier: #WP3; start: 7; end: >>>>>>>>>>> 10). >>>>>>>>>>> >>>>>>>>>>> b axisX numberOfLabels: 5. >>>>>>>>>>> b >>>>>>>>>>> -=-=-=-=-=-=-=-=-=-=-=-= >>>>>>>>>>> >>>>>>>>>>> >>>>>>>>>>> >>>>>>>>>>> Here some slightly more elaborated example: >>>>>>>>>>> >>>>>>>>>>> -=-=-=-=-=-=-=-=-=-=-=-= >>>>>>>>>>> “One color per entry" >>>>>>>>>>> | b d | >>>>>>>>>>> b := RTTimeLine new. >>>>>>>>>>> b addEntry: (RTTimeLineEntry new identifier: #c1; start: 0; end: >>>>>>>>>>> 5). >>>>>>>>>>> b addEntry: (RTTimeLineEntry new identifier: #c1; start: 6; end: >>>>>>>>>>> 8). >>>>>>>>>>> >>>>>>>>>>> b addEntry: (RTTimeLineEntry new identifier: #c2; start: 0; end: >>>>>>>>>>> 5). >>>>>>>>>>> b addEntry: (RTTimeLineEntry new identifier: #c2; start: 8; end: >>>>>>>>>>> 10). >>>>>>>>>>> >>>>>>>>>>> b addEntry: (RTTimeLineEntry new identifier: #c3; start: 0; end: >>>>>>>>>>> 10). >>>>>>>>>>> >>>>>>>>>>> b addEntry: (RTTimeLineEntry new identifier: #c4; start: 5; end: >>>>>>>>>>> 10). >>>>>>>>>>> >>>>>>>>>>> b addEntry: (RTTimeLineEntry new identifier: #c5; start: 5; end: >>>>>>>>>>> 8). >>>>>>>>>>> >>>>>>>>>>> d := RTVerticalTickLineDecorator new. >>>>>>>>>>> d shape line color: Color white. >>>>>>>>>>> b addDecorator: d. >>>>>>>>>>> b axisX >>>>>>>>>>> numberOfLabels: 5; >>>>>>>>>>> labelRotation: -45; >>>>>>>>>>> labelConversion: [ :v | Date year: 2015 day: v ]. >>>>>>>>>>> >>>>>>>>>>> b shape color: (RTMultiLinearColorForIdentity new objects: b >>>>>>>>>>> entries). >>>>>>>>>>> b >>>>>>>>>>> -=-=-=-=-=-=-=-=-=-=-=-= >>>>>>>>>>> >>>>>>>>>>> >>>>>>>>>>> >>>>>>>>>>> One color per timeline >>>>>>>>>>> >>>>>>>>>>> >>>>>>>>>>> -=-=-=-=-=-=-=-=-=-=-=-= >>>>>>>>>>> | b | >>>>>>>>>>> b := RTTimeLine new. >>>>>>>>>>> b addEntry: (RTTimeLineEntry new identifier: #c1; start: 0; end: >>>>>>>>>>> 5). >>>>>>>>>>> b addEntry: (RTTimeLineEntry new identifier: #c1; start: 6; end: >>>>>>>>>>> 8). >>>>>>>>>>> >>>>>>>>>>> b addEntry: (RTTimeLineEntry new identifier: #c2; start: 0; end: >>>>>>>>>>> 5). >>>>>>>>>>> b addEntry: (RTTimeLineEntry new identifier: #c2; start: 8; end: >>>>>>>>>>> 10). >>>>>>>>>>> >>>>>>>>>>> b addEntry: (RTTimeLineEntry new identifier: #c3; start: 0; end: >>>>>>>>>>> 10). >>>>>>>>>>> >>>>>>>>>>> b addEntry: (RTTimeLineEntry new identifier: #c4; start: 5; end: >>>>>>>>>>> 10). >>>>>>>>>>> >>>>>>>>>>> b addEntry: (RTTimeLineEntry new identifier: #c5; start: 5; end: >>>>>>>>>>> 8). >>>>>>>>>>> >>>>>>>>>>> d := RTVerticalTickLineDecorator new. >>>>>>>>>>> d shape line color: Color white. >>>>>>>>>>> b addDecorator: d. >>>>>>>>>>> b axisX >>>>>>>>>>> numberOfLabels: 5; >>>>>>>>>>> labelRotation: -45; >>>>>>>>>>> labelConversion: [ :v | Date year: 2015 day: v ]. >>>>>>>>>>> >>>>>>>>>>> b shape color: (RTMultiLinearColorForIdentity new command: >>>>>>>>>>> #identifier; >>>>>>>>>>> objects: #(c1 c2 c3 c4 c5)). >>>>>>>>>>> b >>>>>>>>>>> -=-=-=-=-=-=-=-=-=-=-=-= >>>>>>>>>>> >>>>>>>>>>> >>>>>>>>>>> Age of some classes: >>>>>>>>>>> -=-=-=-=-=-=-=-=-=-=-=-= >>>>>>>>>>> | b | >>>>>>>>>>> b := RTTimeLine new. >>>>>>>>>>> b extent: 500 @ 500. >>>>>>>>>>> ((RTShape withAllSubclasses sortedAs: #ageInDaysRounded) select: >>>>>>>>>>> #hasMethods) >>>>>>>>>>> do: [ :cls | >>>>>>>>>>> e := RTTimeLineEntry new. >>>>>>>>>>> e identifier: cls. >>>>>>>>>>> e start: cls computeYoungestMethod ageInDays. >>>>>>>>>>> e end: cls computeOldestMethod ageInDays. >>>>>>>>>>> b addEntry: e ]. >>>>>>>>>>> b >>>>>>>>>>> -=-=-=-=-=-=-=-=-=-=-=-= >>>>>>>>>>> >>>>>>>>>>> >>>>>>>>>>> >>>>>>>>>>> All these examples are in the Roassal time line example menu. >>>>>>>>>>> >>>>>>>>>>> This is still an early version. Let us know how it goes! >>>>>>>>>>> https://www.facebook.com/ObjectProfile/posts/840542572699008 >>>>>>>>>>> >>>>>>>>>>> Cheers, >>>>>>>>>>> Alexandre >>>>>>>>>>> >>>>>>>>>>> -- >>>>>>>>>>> _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: >>>>>>>>>>> Alexandre Bergel http://www.bergel.eu >>>>>>>>>>> ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;. >>>>>>>>>>> >>>>>>>>>>> >>>>>>>>>>> >>>>>>>>>>>> On May 7, 2015, at 4:25 PM, H. Hirzel hannes.hirzel@gmail.com >>>>>>>>>>>> wrote: >>>>>>>>>>>> >>>>>>>>>>>> Hello >>>>>>>>>>>> >>>>>>>>>>>> Has somebody done a GANTT chart? >>>>>>>>>>>> >>>>>>>>>>>> GanttChartMorph openOn: aCollectionOfActivities >>>>>>>>>>>> >>>>>>>>>>>> ? >>>>>>>>>>>> >>>>>>>>>>>> Activities have >>>>>>>>>>>> - id >>>>>>>>>>>> - description >>>>>>>>>>>> - start date >>>>>>>>>>>> - end date >>>>>>>>>>>> ? >>>>>>>>>>>> >>>>>>>>>>>> Regards >>>>>>>>>>>> >>>>>>>>>>>> Hannes >>>>>>>>>> >>>>>>>>>> _______________________________________________ >>>>>>>>>> Moose-dev mailing list >>>>>>>>>> Moose-dev@iam.unibe.ch >>>>>>>>>> https://www.iam.unibe.ch/mailman/listinfo/moose-dev >>>>>>>>> >>>>>>>>> >>>>>>>> >>>>>>>> _______________________________________________ >>>>>>>> Moose-dev mailing list >>>>>>>> Moose-dev@iam.unibe.ch >>>>>>>> https://www.iam.unibe.ch/mailman/listinfo/moose-dev >>>>>>> >>>>>>> >>>>>> >>>>> <Roassal2_configurations_Screenshot from 2015-07-29 >>>>> 18:23:50.png>_______________________________________________ >>>>> Moose-dev mailing list >>>>> Moose-dev@iam.unibe.ch >>>>> https://www.iam.unibe.ch/mailman/listinfo/moose-dev >>>> >>>> >>> <Pharo_Roassal_GANTT_chart_Screenshot from 2015-07-30 14:55:31.png> >> >> >