I've been working on creating a presentation using Glamour.
Making a browser fullscreen:
browser
configureForEmbedding;
bounds: (RealEstateAgent maximumUsableAreaInWorld: World).
Switching the UITheme to the white Glamorous theme gets rid of most of the
darker background.
When embedding a GTPlayground in another browser, I need to override the
reaction to GLMBrowserClosing
GTPlayGround>>compose
on: GLMBrowserClosing do: [
"This is a hack for the moment.
We need a better mechanism from Glamour to help
us keep the model in sync"
self entity
content: self first panes first presentations first text.
self entity content asString trimBoth isEmpty
ifFalse: [ self class repository add: self entity ] ]
In presentation mode, I give one of the columns (with a tree pane) a span of 0.
I can then still control the tree contents in it with the cursor keys.
Once I click inside a text pane, I can no longer give the tree pane
focus. I would like to have an action to show/hide the pane. How do I force
a redraw after setting the span?
How do I make the text area really read-only?
Stephan
I try to open a Spec model in Playground like :
MessageBrowser
browseMessages: Object methods
refreshingBlock: []
named: ''
but there is no preview tab apparently.
--
Serge Stinckwich
UCBN & UMI UMMISCO 209 (IRD/UPMC)
Every DSL ends up being Smalltalk
http://www.doesnotunderstand.org/
Hi,
I discovered a significant problem in
RTMetricNormalizer>>normalizeWidth:min:max:using:.
The method is used in the Charter package and it produces an unwanted
normalization. I fixed it for this case (see the comment below), but I
think we should take the time to review the whole class.
Name: Roassal2-TudorGirba.476
Author: TudorGirba
Time: 19 September 2014, 12:14:30.030534 pm
UUID: 097886cf-6898-d541-a4a7-21431cfecd67
Ancestors: Roassal2-TudorGirba.475
Patched normalizeWidth. This is used in the Charter package.
The old implementation was like this:
tt := min + ((max - min) * ( (t - minValue) / (maxValue - minValue)))
asInteger.
The problem with this is that the normalization will return for the lowest
value, the specified min value.
So, if we had two numbers 10 and 5 to be normalized between 0 and 100, we
would get:
- 10 => 100
- 5 => 0
This rule works for colors, but for numbers, we want that 5 to be 50.
So, the current implementation looks like:
tt := t * (max-min) / maxValue.
Cheers,
Doru
--
www.tudorgirba.com
"Every thing has its own flow"
>
> Ok, let me know how it goes
This the code with glamours
constructor roassal2
title: 'Visualization';
act: [:p | p update]
icon: GLMUIThemeExtraIcons glamorousRefresh
entitled: 'Update';
painting: [:each :data |
data class== KETimeSeries ifTrue:[
| b |
b := RTCharterBuilder new view: each.
b extent: 400 @ 200.
b shape rectangle size: 0.
b points: data index.
b x: #yourself.
b y: [ :x | data at: x ].
b connectDotColor: Color blue.
b axisXTitled: 'Time'.
b axisYTitled: 'Number of individuals of ' , (donne keyAtValue: data).
b build.
each canvas camera translateBy: 0 @ -100.
each @RTDraggableView.]
]
This produce the first screenshot
> Sure! You do not have to add the from and to element to the view. You can
> simply add the edge.
> Consider the example, with a nice animation:
>
> -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
> v := RTView new.
> edges := OrderedCollection new.
>
> es := RTBox elementsOn: (1 to: 300).
> RTGridLayout new gapSize: 30; on: es.
>
> es do: [ :e |
> | te |
> te := RTBox element.
> te translateTo: e position + (0 @ 10).
> edges add: ((RTArrow new color: Color black) edgeFrom: e to: te).
> ].
>
> v addAll: edges.
>
> v when: TRMouseMove do: [ :evt |
> edges do: [ :edge |
> edge to translateTo: (evt position - edge from position) /
> 10 + edge from position.
> ].
> v signalUpdate.
> ].
> v
> -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
>
> All the arrows moves when the mouse move. The extremities of each arrow is
> not in the view.
>
I'm sure! I'll try to follow your example tomorrow.
You can see in the second screenshot what i want to do! In this view, i
want to hide the box "Naissance0", "Deces0", "Deces1", ....
Thanks!
--
*ATREVI D. Fabrice*
*Master en Informatique A l'Institut de la Francophonie pour l'Informatique
(IFI/Hanoï)*
Hi All,
I have been working on a visualisation of latency on a network. I found an interesting dataset with latency information of 140 cities around the world.
In the visualisation I show different metrics regarding latency such as from each city which other has the best/worst latency; cities that geographically are close but have high latency; far cities that have low latency; and average latency for each city.
When visualising the worst latency for each city I found that, for this network (at least), Valencia and in a minor extent Nairobi represent the worst endpoint for connections (in terms of latency). Also in the visualisation of far cities with low latency, Newmarket in Canada and Toledo in Spain concentrate the best endpoint for connections coming from Europe and North-America respectively.
Here a couple of screenshots:
Here there is a screencast:
http://www.youtube.com/watch?v=gDQnE-5yeWI
If you want to load the code:
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
Gofer new smalltalkhubUser: 'merino'
project: 'NetworkLatency';
package: 'ConfigurationOfNetworkLatency';
load.
(ConfigurationOfNetworkLatency project version: '0.1') load.
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=--=-=-=-=
To execute the visualisation:
NLVisualise new open
I would be glad to have your comments and suggestions.
Best regards,
Leonel Merino
Research Assistant
Software Composition Group
Institute of Computer Science and Applied Mathematics
University of Bern
Hi Mr Alexandre!
It's ok now. I use RTCharterBuilder in my browser with Glamour. :)
I have another preoccupation. I want to know, if it's possible to hide a
box in Roassal2. Indeed, I want to draw one box and one edge. The edge will
come from the box and will haven't the end box. I think, i can draw two box
and a edge between its, and hide the end box box.
Thanks a lot!
2014-09-19 15:49 GMT+01:00 <moose-dev-request(a)iam.unibe.ch>:
> Send Moose-dev mailing list submissions to
> moose-dev(a)iam.unibe.ch
>
> To subscribe or unsubscribe via the World Wide Web, visit
> https://www.iam.unibe.ch/mailman/listinfo/moose-dev
> or, via email, send a message with subject or body 'help' to
> moose-dev-request(a)iam.unibe.ch
>
> You can reach the person managing the list at
> moose-dev-owner(a)iam.unibe.ch
>
> When replying, please edit your Subject line so it is more specific
> than "Re: Contents of Moose-dev digest..."
>
>
> Today's Topics:
>
> 1. Re: bug with GET2Line in graphET2 (Alexandre Bergel)
>
>
> ----------------------------------------------------------------------
>
> Message: 1
> Date: Fri, 19 Sep 2014 07:48:56 -0700
> From: Alexandre Bergel <alexandre.bergel(a)me.com>
> Subject: [Moose-dev] Re: bug with GET2Line in graphET2
> To: Moose-related development <moose-dev(a)iam.unibe.ch>
> Message-ID: <DEED1CB6-FBB8-4CB5-A622-4AD99FD00149(a)me.com>
> Content-Type: text/plain; charset="iso-8859-1"
>
> Hi Fabrice,
>
> We have known this bug for quite some time. Actually, this is this bug
> which has motivated us to start Charter.
>
> I suggest you to complete drop GraphET2 and focus on Charter. Here is an
> example:
> -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
> b := RTCharterBuilder new.
> b extent: 300 @ 300.
> b shape rectangle size: 0.
> b points: (0 to: 100).
> b allY: [ :x | x * x ].
> b allX: #yourself.
> b connectDotColor: Color gray.
> b axisXTitled: 'X'; axisYTitled: 'Y'.
> b build
> -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
>
> It produces the following:
>
>
> Let us know how we can help you to migrate your code from GraphET2 to
> Charter.
>
> Cheers,
> Alexandre
>
> On Sep 19, 2014, at 6:24 AM, Fabrice Atrevi <atrevifabrice(a)gmail.com>
> wrote:
>
> > Hi,
> > I face a bug in the labelling of x-axis with GET2Line in graphET2. For
> example, with this code:
> >
> > | builder |
> > builder := GET2Line data: (0 to: 100).
> > builder
> > y: [ :x | x*x ];
> > dotSize: 10.
> >
> > builder open
> >
> > I got the first screenshot.
> >
> > With another example, i note that, the X-Axis take the right value, but
> the label is not correct.
> >
> > | bg|
> > data class== KETimeSeries ifTrue:[
> > bg := GET2Line new view: each; data: (data index).
> > bg x: [:e | (data index) at: e];
> > y: [ :x | data at: x];
> > title:'Graph of compartment ' ,(donne keyAtValue: data);
> > lineWidth: 2;
> > height: 200;
> > width: 500.
> > bg interaction popupText.
> > bg build.
> >
> > The second screenshot show that, when i point the value "24.35" on the
> x-axis, i get "50" because i use "interaction popupText".
> > The third screenshot show what i got with another builder.
> >
> > Remark: i have integrated GET2Line in a browser with Glamour.
> >
> > Thanks
> >
> > --
> > ATREVI D. Fabrice
> > Master en Informatique A l'Institut de la Francophonie pour
> l'Informatique (IFI/Hano?)
> >
> <cap1.PNG><cap2.png><cap3.png>_______________________________________________
> > 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
> ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
>
>
>
>
Hi,
I face a bug in the labelling of x-axis with GET2Line in graphET2. For
example, with this code:
| builder |
builder := GET2Line data: (0 to: 100).
builder
y: [ :x | x*x ];
dotSize: 10.
builder open
I got the first screenshot.
With another example, i note that, the X-Axis take the right value, but the
label is not correct.
| bg|
data class== KETimeSeries ifTrue:[
bg := GET2Line new view: each; data: (data index).
bg x: [:e | (data index) at: e];
y: [ :x | data at: x];
title:'Graph of compartment ' ,(donne keyAtValue: data);
lineWidth: 2;
height: 200;
width: 500.
bg interaction popupText.
bg build.
The second screenshot show that, when i point the value "24.35" on the
x-axis, i get "50" because i use "interaction popupText".
The third screenshot show what i got with another builder.
Remark: i have integrated GET2Line in a browser with Glamour.
Thanks
--
*ATREVI D. Fabrice*
*Master en Informatique A l'Institut de la Francophonie pour l'Informatique
(IFI/Hanoï)*
Hi,
I put together a new webpage at:
http://moosetechnology.org
The old webpage got unstable and unmaintainable, so I decided to put
together a static webpage for now. One goal would be to move to Marina, but
until then we need a web presence. As you can see, the look is ...
different, including the logo.
Please take a look and let me know what you think, and of course, report
problems if you see any.
Cheers,
Doru
--
www.tudorgirba.com
"Every thing has its own flow"