[Pharo-users] Roassal HTML exporter

Thierry Goubier thierry.goubier at gmail.com
Fri Dec 12 10:38:57 EST 2014


Hi Alexandre,

this is great. There is a bit of javascript magic going in there, isn't it?

(<script type="text/javascript" src="RODraggingAndUtil.js"></script>)

When adding some specific support such as the OpenStreetMap data, there is
a bit of work to do to extend it? Or would it consider it as a bitmap?

Thanks,

Thierry


2014-12-12 0:20 GMT+01:00 Alexandre Bergel <alexandre.bergel at me.com>:

> Hi!
>
> We have worked very hard on a Roassal exporter for the Web.
>
> Milton has produced the class RTHTML5Exporter, which may be simply invoked
> as: RTHTML5Exporter new export: aRoassalView.
>
> Check this out:
> https://dl.dropboxusercontent.com/u/31543901/RoassalHTML/index.html
>
> Try moving the mouse above the circle or dots in the curve.
>
> The html file you see from your web browser is the result of do-iting the
> following expression:
> -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
> -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
> | c b c2 |
> c := RTComposer new.
>
> "======"
> b := RTGraphBuilder new.
>         b view: c view.
> b edges
>         connectFrom: #superclass;
>         useInLayout.
>
> b edges
>         if: [ :fromClass :toClass | toClass name beginsWith: 'TR' ];
>         connectTo: #dependentClasses;
>         color: (Color blue alpha: 0.3).
>
>
> b nodes
>         if: [ :cls | cls name beginsWith: 'RT' ];
>         color: Color blue.
> b nodes
>         color: Color red.
> b layout cluster.
>
> b global
>         normalizeSize: #numberOfMethods min: 5 max: 40 using: #sqrt;
>         alphaColor: 0.4.
>
> b addAll: TRShape withAllSubclasses, RTShape withAllSubclasses.
>
> b build.
> c group.
>
> "======"
> c2 := RTCharterBuilder new.
> c2 view: c view.
>
> c2 interaction popup.
> c2 extent: 300 @ 200.
> c2 points: (RTShape withAllSubclasses sortedAs: #numberOfMethods).
> c2 connectDotColor: Color blue.
>
> c2 points: (TRShape withAllSubclasses sortedAs: #numberOfMethods).
> c2 stackX.
> c2 allY: #numberOfMethods.
> c2 connectDotColor: Color red.
>
> c2 axisX.
> c2 axisY.
> c2 build.
> c group.
> "======"
>
> c layout: RTVerticalLineLayout new.
> c propagateHighlightToAll.
> "======"
>
> legend := RTLegendBuilder new.
> legend view: c view.
> legend addText: 'This is a demonsration of a combination of builders'.
> legend addText: 'The above visualization shows the dependencies between
> Roassal and Trachel shapes.'.
> legend addText: 'Curves indicate the distribution of the number of
> methods'.
> legend build.
> "======"
>
> RTHTML5Exporter new export: c view.
> c view
> -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
> -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
>
> --
> _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
> Alexandre Bergel  http://www.bergel.eu
> ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
>
>
>
>
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.pharo.org/pipermail/pharo-users_lists.pharo.org/attachments/20141212/1954afe3/attachment.html>


More information about the Pharo-users mailing list