GanttChartMorph openOn: aCollectionOfActivities ?
Hello Has somebody done a GANTT chart? GanttChartMorph openOn: aCollectionOfActivities ? Activities have - id - description - start date - end date ? Regards Hannes
Hi Hannes, We are currently working on a gantt chart diagram. Beginning of next week (or during the week end) we will release it. 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
oh oh!!! A good gantt chat would be fabulous. Could elements be made draggable in a constrained way? That could encourage me to start a project scheduling application. cheers -ben On Sat, May 9, 2015 at 2:09 AM, Alexandre Bergel <alexandre.bergel@me.com> wrote:
Hi Hannes,
We are currently working on a gantt chart diagram.
Beginning of next week (or during the week end) we will release it.
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
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
On Fri, May 8, 2015 at 1:33 PM, Alexandre Bergel <alexandre.bergel@me.com> wrote:
Hi Hannes!
Here is a first shoot paired-programmed with Juraj using Roassal:
Neat! I think I can use this.. question: <snip>
b axisX numberOfLabels: 5. b -=-=-=-=-=-=-=-=-=-=-=-=
so, numberOfLabels means the origin label + that number of labels? You ask for 5,and it shows 6. Not an issue per se, but I do want to know that this is intentional and will stay.
-cbc
Hi Chris, 5 + the 0 This will not change. Let us know if you have some usage... Cheers, Alexandre -- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: Alexandre Bergel http://www.bergel.eu ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
On May 8, 2015, at 3:50 PM, Chris Cunningham <cunningham.cb@gmail.com> wrote:
so, numberOfLabels means the origin label + that number of labels? You ask for 5,and it shows 6. Not an issue per se, but I do want to know that this is intentional and will stay.
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
You should load the latest Roassal. 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
On 5/10/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. --Hannes
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
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
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
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
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
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
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>
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>
The ââ¦â button, top right of a GTInspector that is showing a Roassal visualization. https://dl.dropboxusercontent.com/u/31543901/TMP/Screen%20Shot%202015-07-30%... Alexandre -- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: 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>
The SVG export accessible through the '...' menu works fine. A new question regarding the labeling of the x-axis. How do I specify that I want to see months 8 9 10 11 12 only? data := #( #(WP1 8 12) #(WP2 8 10) #(WP3 10 11) #(WP4 11 12) And is something like this possible? 8 9 10 11 12 1 2 3 4 --Hannes On 7/31/15, Alexandre Bergel <alexandre.bergel@me.com> wrote:
The ââ¦â button, top right of a GTInspector that is showing a Roassal visualization.
https://dl.dropboxusercontent.com/u/31543901/TMP/Screen%20Shot%202015-07-30%...
Alexandre -- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: 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>
And a more natural order of presentation without reordering the input? data := #( #(prototype 8 12) #(web_publication 11 12) #(review 10 11) #(analysis 8 10) ). On 8/1/15, H. Hirzel <hannes.hirzel@gmail.com> wrote:
The SVG export accessible through the '...' menu works fine.
A new question regarding the labeling of the x-axis.
How do I specify that I want to see months
8 9 10 11 12
only?
data := #( #(WP1 8 12) #(WP2 8 10) #(WP3 10 11) #(WP4 11 12)
And is something like this possible?
8 9 10 11 12 1 2 3 4
--Hannes
On 7/31/15, Alexandre Bergel <alexandre.bergel@me.com> wrote:
The ââ¦â button, top right of a GTInspector that is showing a Roassal visualization.
https://dl.dropboxusercontent.com/u/31543901/TMP/Screen%20Shot%202015-07-30%...
Alexandre -- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: 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>
I guess this is supported. Give me a few hours, I am away from my laptop Alexandre
Le 1 août 2015 à 00:58, H. Hirzel <hannes.hirzel@gmail.com> a écrit :
And a more natural order of presentation without reordering the input?
data := #( #(prototype 8 12) #(web_publication 11 12) #(review 10 11) #(analysis 8 10) ).
On 8/1/15, H. Hirzel <hannes.hirzel@gmail.com> wrote: The SVG export accessible through the '...' menu works fine.
A new question regarding the labeling of the x-axis.
How do I specify that I want to see months
8 9 10 11 12
only?
data := #( #(WP1 8 12) #(WP2 8 10) #(WP3 10 11) #(WP4 11 12)
And is something like this possible?
8 9 10 11 12 1 2 3 4
--Hannes
On 7/31/15, Alexandre Bergel <alexandre.bergel@me.com> wrote: The ââ¦â button, top right of a GTInspector that is showing a Roassal visualization.
https://dl.dropboxusercontent.com/u/31543901/TMP/Screen%20Shot%202015-07-30%...
Alexandre -- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: 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>
_______________________________________________ Moose-dev mailing list Moose-dev@iam.unibe.ch https://www.iam.unibe.ch/mailman/listinfo/moose-dev
Sure, this is easy. Axis supports a method called #labelConversion: [ :aNumericalValue | ⦠] You need to provide a bloc that returns a string. For example: | data b s | data := #(#(c1 0 5) #(c1 6 8) #(c2 0 5) #(c2 8 10) #(c3 0 10) #(c4 5 10) #(c5 5 8)). b := RTTimeline new. s := RTTimelineSet new. s objects: data. s lineIdentifier: #first. s start: #second. s end: #third. b add: s. b axisY title: 'Task'. b axisX numberOfLabels: 10; title: 'Week day'; labelConversion: [ :v | v \\ 7 + 1 ]. b build. ^ b view Does this help? Cheers, Alexandre
On Aug 1, 2015, at 12:48 AM, H. Hirzel <hannes.hirzel@gmail.com> wrote:
The SVG export accessible through the '...' menu works fine.
A new question regarding the labeling of the x-axis.
How do I specify that I want to see months
8 9 10 11 12
only?
data := #( #(WP1 8 12) #(WP2 8 10) #(WP3 10 11) #(WP4 11 12)
And is something like this possible?
8 9 10 11 12 1 2 3 4
--Hannes
On 7/31/15, Alexandre Bergel <alexandre.bergel@me.com> wrote:
The ââ¦â button, top right of a GTInspector that is showing a Roassal visualization.
https://dl.dropboxusercontent.com/u/31543901/TMP/Screen%20Shot%202015-07-30%...
Alexandre -- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: 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>
<Roassal_timeline_x_axis_question_Screenshot from 2015-08-01.png>
-- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: Alexandre Bergel http://www.bergel.eu ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
This worked fine. The code is very readable and easy to adapt once there is an example. Thank you. --Hannes On 8/1/15, Alexandre Bergel <alexandre.bergel@me.com> wrote:
Sure, this is easy. Axis supports a method called #labelConversion: [ :aNumericalValue | ⦠] You need to provide a bloc that returns a string.
For example:
| data b s | data := #(#(c1 0 5) #(c1 6 8) #(c2 0 5) #(c2 8 10) #(c3 0 10) #(c4 5 10) #(c5 5 8)).
b := RTTimeline new.
s := RTTimelineSet new. s objects: data. s lineIdentifier: #first. s start: #second. s end: #third. b add: s.
b axisY title: 'Task'. b axisX numberOfLabels: 10; title: 'Week day'; labelConversion: [ :v | v \\ 7 + 1 ].
b build. ^ b view
Does this help?
Cheers, Alexandre
On Aug 1, 2015, at 12:48 AM, H. Hirzel <hannes.hirzel@gmail.com> wrote:
The SVG export accessible through the '...' menu works fine.
A new question regarding the labeling of the x-axis.
How do I specify that I want to see months
8 9 10 11 12
only?
data := #( #(WP1 8 12) #(WP2 8 10) #(WP3 10 11) #(WP4 11 12)
And is something like this possible?
8 9 10 11 12 1 2 3 4
--Hannes
On 7/31/15, Alexandre Bergel <alexandre.bergel@me.com> wrote:
The ââ¦â button, top right of a GTInspector that is showing a Roassal visualization.
https://dl.dropboxusercontent.com/u/31543901/TMP/Screen%20Shot%202015-07-30%...
Alexandre -- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: 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>
<Roassal_timeline_x_axis_question_Screenshot from 2015-08-01.png>
-- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: Alexandre Bergel http://www.bergel.eu ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
participants (5)
-
Alexandre Bergel -
Ben Coman -
Chris Cunningham -
H. Hirzel -
Peter Uhnák