Hi,

You should use the Moose image.

I just tried and it works. As far as I can see the goal is to produce a visual tool for software assessment. It looks pretty good. I will take a look at the code later.

Keep it up.

Doru


On Tue, Apr 22, 2014 at 11:43 AM, kilon alios <kilon.alios@gmail.com> wrote:
I tried your code but I am getting errors. I downloaded your Configuration and I did ConfigurationOfTelescope loadBleedingEdge. 

Try the first sample gives me 

MNU>>receiver of "new" is nil

UndefinedObject(Object)>>doesNotUnderstand: #new
TLVizuBuilder>>kontract:
TLVizuBuilder>>render in Block: [ :c | ...
Array(SequenceableCollection)>>do:
TLVizuBuilder>>render
TLVizuBuilder>>open
TLTelescope>>open
UndefinedObject>>DoIt
OpalCompiler>>evaluate
SmalltalkEditor>>evaluateSelectionAndDo:
SmalltalkEditor>>evaluateSelection
PluggableTextMorph>>doIt in Block: [ textMorph editor evaluateSelection ]
PluggableTextMorph>>handleEdit: in Block: [ result := editBlock value ]
TextMorphForEditView(TextMorph)>>handleEdit:
PluggableTextMorph>>handleEdit:
PluggableTextMorph>>doIt
SmalltalkEditor class>>buildSmalltalkEditorKeymappingsOn: in Block: [ :morph | morph doIt ]
BlockClosure>>cull:
BlockClosure>>cull:cull:
BlockClosure>>cull:cull:cull:
KMCategoryBinding>>completeMatch:buffer:
KMKeymap>>notifyCompleteMatchTo:buffer: in Block: [ :l | l completeMatch: self buffer: aBuffer ]
Array(SequenceableCollection)>>do:
KMKeymap>>notifyCompleteMatchTo:buffer:
KMKeymap>>onMatchWith:notify:andDo:
KMCategory>>onMatchWith:notify:andDo: in Block: [ :entry | entry onMatchWith: anEventBuffer notify...etc...
Set>>do:
KMCategory>>onMatchWith:notify:andDo:
KMCategoryBinding>>verifyMatchWith:notifying:thenDoing:
KMDispatcher>>dispatch: in Block: [ :aTarget | ...

second sample gives me another error 

CharacterSet class(Object)>>doesNotUnderstand: #numberOfLinesOfCode
UndefinedObject>>DoIt in Block: [ :class | class numberOfLinesOfCode > 30 ]
BlockClosure>>rtValue:
TLVizuBuilder>>onElements:containers:properties: in Block: [ :element | ...
OrderedCollection>>do:
TLVizuBuilder>>onElements:containers:properties:
TLTelescope>>onElements:containers:properties:
UndefinedObject>>DoIt
OpalCompiler>>evaluate
SmalltalkEditor>>evaluateSelectionAndDo:
SmalltalkEditor>>evaluateSelection
PluggableTextMorph>>doIt in Block: [ textMorph editor evaluateSelection ]
PluggableTextMorph>>handleEdit: in Block: [ result := editBlock value ]
TextMorphForEditView(TextMorph)>>handleEdit:
PluggableTextMorph>>handleEdit:
PluggableTextMorph>>doIt
SmalltalkEditor class>>buildSmalltalkEditorKeymappingsOn: in Block: [ :morph | morph doIt ]
BlockClosure>>cull:
BlockClosure>>cull:cull:
BlockClosure>>cull:cull:cull:
KMCategoryBinding>>completeMatch:buffer:
KMKeymap>>notifyCompleteMatchTo:buffer: in Block: [ :l | l completeMatch: self buffer: aBuffer ]
Array(SequenceableCollection)>>do:
KMKeymap>>notifyCompleteMatchTo:buffer:
KMKeymap>>onMatchWith:notify:andDo:
KMCategory>>onMatchWith:notify:andDo: in Block: [ :entry | entry onMatchWith: anEventBuffer notify...etc...
Set>>do:
KMCategory>>onMatchWith:notify:andDo:
KMCategoryBinding>>verifyMatchWith:notifying:thenDoing:
KMDispatcher>>dispatch: in Block: [ :aTarget | ...

I am huge fun of astronomy, I am definitely interested in working as a beta tester for your code and learn more about Roassal :) I am actually learning Roassal and Mondrian during my easter vacations . 


On Tue, Apr 22, 2014 at 12:20 PM, Leo Perard <leo.perard@gmail.com> wrote:
Hi everybody,

I'm working on vizualisation with Roassal2 and I would like to have some feedbacks on my work.
You can vizualise some elements in their containers and test a property on the elements.
You have the legend build with the property and a menu (not a lot of features in the menu but it will come).
Edges are not available yet, but I'm working on it.

The repository :

MCHttpRepository
user: ''
password: ''

To load the project : ConfigurationOfTelescope load

To play with it you can follow this example :

| telescope |
telescope := TLTelescope new onContainers: Collection withAllSubclasses elements: #authors properties: #yourself.
telescope numberOfColors: 9. "optional"
telescope open

or

| telescope |
telescope := TLTelescope new onElements: Collection withAllSubclasses containers: #package properties: [ :class | class numberOfLinesOfCode > 30 ].
telescope numberOfColors: 9. "optional"
telescope open


If you have any ideas, or find somes bugs do not hesitate to report to me.

Thanks.

--
Leo Perard

_______________________________________________
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




--
www.tudorgirba.com

"Every thing has its own flow"