13 Feb
2014
13 Feb
'14
2 p.m.
Hi,
I added last night a first version of an integration of Roassal2 into
Glamour.
For example, try:
GLMCompositePresentation new
with: [ :c |
c roassal2
painting: [ :v :roassal2Presentation :entity |
v addAll: ((RTEllipse new color: Color purple; size: 10)
elementsOn: entity withAllSubclasses) @ RTDraggable.
RTEdge
buildEdgesFromObjects: entity withAllSubclasses
from: #superclass
to: #yourself
inView: v.
RTClusterLayout on: v elements edges: v edges.
v edges do: [ :e | e trachelShape pushBack ] ] ];
openOn: Collection
It's also integrated in GTInspector. For example, just inspect:
| v |
v := RTView new.
v addAll: ((RTEllipse new color: Color purple)
elementsOn: Collection withAllSubclasses).
RTEdge
buildEdgesFromObjects: Collection withAllSubclasses
from: #superclass
to: #yourself
inView: v.
RTClusterLayout on: v elements edges: v edges.
v edges do: [ :e | e trachelShape pushBack ].
v
(see attachment)
[image: Inline image 1]
Cheers,
Doru
--
www.tudorgirba.com
"Every thing has its own flow"
13 Feb
13 Feb
2:11 p.m.
I would like to have the default canvas color to be white.
Alex, do you have anything against that?
Doru
On Thu, Feb 13, 2014 at 2:00 PM, Tudor Girba <tudor(a)tudorgirba.com> wrote:
Hi,
I added last night a first version of an integration of Roassal2 into
Glamour.
For example, try:
GLMCompositePresentation new
with: [ :c |
c roassal2
painting: [ :v :roassal2Presentation :entity |
v addAll: ((RTEllipse new color: Color purple; size: 10)
elementsOn: entity withAllSubclasses) @ RTDraggable.
RTEdge
buildEdgesFromObjects: entity withAllSubclasses
from: #superclass
to: #yourself
inView: v.
RTClusterLayout on: v elements edges: v edges.
v edges do: [ :e | e trachelShape pushBack ] ] ];
openOn: Collection
It's also integrated in GTInspector. For example, just inspect:
| v |
v := RTView new.
v addAll: ((RTEllipse new color: Color purple)
elementsOn: Collection withAllSubclasses).
RTEdge
buildEdgesFromObjects: Collection withAllSubclasses
from: #superclass
to: #yourself
inView: v.
RTClusterLayout on: v elements edges: v edges.
v edges do: [ :e | e trachelShape pushBack ].
v
(see attachment)
[image: Inline image 1]
Cheers,
Doru
--
www.tudorgirba.com
"Every thing has its own flow"
--
www.tudorgirba.com
"Every thing has its own flow"
3:35 p.m.
I would like to have the default canvas color to be
white.
Alex, do you have anything against that?
The idea of having a non-white background came from the fact that white is aggressive for
the eyes.
Next semester, some people here will work on Palette, a mechanism to pick from an
harmonious color set. Palette will probably offer a set of color normalizers.
TextMate is gray per default. InteliJ as well. Processing as well, everything is grayish
like what we have now in Roassal2.
I am not against a white background, but I have the impression it goes not go in the right
direction. What would be a nice default color palette ?
Alexandre
On Thu, Feb 13, 2014 at 2:00 PM, Tudor Girba <tudor(a)tudorgirba.com> wrote:
Hi,
I added last night a first version of an integration of Roassal2 into Glamour.
For example, try:
GLMCompositePresentation new
with: [ :c |
c roassal2
painting: [ :v :roassal2Presentation :entity |
v addAll: ((RTEllipse new color: Color purple; size: 10)
elementsOn: entity
withAllSubclasses) @ RTDraggable.
RTEdge
buildEdgesFromObjects: entity withAllSubclasses
from: #superclass
to: #yourself
inView: v.
RTClusterLayout on: v elements edges: v edges.
v edges do: [ :e | e trachelShape pushBack ] ] ];
openOn: Collection
It's also integrated in GTInspector. For example, just inspect:
| v |
v := RTView new.
v addAll: ((RTEllipse new color: Color purple)
elementsOn: Collection withAllSubclasses).
RTEdge
buildEdgesFromObjects: Collection withAllSubclasses
from: #superclass
to: #yourself
inView: v.
RTClusterLayout on: v elements edges: v edges.
v edges do: [ :e | e trachelShape pushBack ].
v
(see attachment)
<Playground-roassal2.png>
Cheers,
Doru
--
www.tudorgirba.com
"Every thing has its own flow"
--
www.tudorgirba.com
"Every thing has its own flow"
_______________________________________________
Moose-dev mailing list
Moose-dev(a)iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
3:31 p.m.
Excellent!!!!!!
Just in time for the big demo I will do in a couple of hours!!!
Alexandre
On Feb 13, 2014, at 5:00 AM, Tudor Girba <tudor(a)tudorgirba.com> wrote:
Hi,
I added last night a first version of an integration of Roassal2 into Glamour.
For example, try:
GLMCompositePresentation new
with: [ :c |
c roassal2
painting: [ :v :roassal2Presentation :entity |
v addAll: ((RTEllipse new color: Color purple; size: 10)
elementsOn: entity
withAllSubclasses) @ RTDraggable.
RTEdge
buildEdgesFromObjects: entity withAllSubclasses
from: #superclass
to: #yourself
inView: v.
RTClusterLayout on: v elements edges: v edges.
v edges do: [ :e | e trachelShape pushBack ] ] ];
openOn: Collection
It's also integrated in GTInspector. For example, just inspect:
| v |
v := RTView new.
v addAll: ((RTEllipse new color: Color purple)
elementsOn: Collection withAllSubclasses).
RTEdge
buildEdgesFromObjects: Collection withAllSubclasses
from: #superclass
to: #yourself
inView: v.
RTClusterLayout on: v elements edges: v edges.
v edges do: [ :e | e trachelShape pushBack ].
v
(see attachment)
<Playground-roassal2.png>
Cheers,
Doru
--
www.tudorgirba.com
"Every thing has its own flow"
_______________________________________________
Moose-dev mailing list
Moose-dev(a)iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
4156
days inactive
4156
days old
3 comments
2 participants
participants (2)
-
Alexandre Bergel -
Tudor Girba