Hi Lou,

For the Json stuff Herbert is correct.  You will need to load a
Json reader.  On my image I use.

Json readFrom: self readStream. To get a dictionary.  You then just read
the values from the dictionary.

Some other Json reader might have #readFromString: as Herbert suggested.

For managing the package if it is not loaded I would recommend adding

Smalltalk at: #KscEarthSunAstroData ifPresent: [ <put your draw code here>
].

That way you handle the problem if the dependency is not loaded.

I also had a problem with my image (4.1)

I had to use:
Project current fullScreenOn and Project current fullScreenOff.

Also, it is possible to return fraction from your x point calculation which
will cause problems:   I added asFloat below to fix it.

Form >> drawString: aString centeredIn: rect vOffset: vOffset withFont:
font color: color
"Display the string centered horizontally in the rectangle with a vertical
offset from the top using the font and color."
| bb stringExtent f x y rOrigin |

bb := (StringMorph contents: aString font: font) imageForm boundingBox.
stringExtent := bb extent.
f := Form extent: stringExtent depth: 32.
f getCanvas drawString: aString in: (0 at 0 extent: stringExtent) font: font
color: color.
rOrigin := rect origin.
x := rOrigin x + ((rect width - bb width) / 2) asFloat.
y := rOrigin y + vOffset.
self getCanvas translucentImage: f at: (x at y).

I also noticed that the time quite large :)
I'm seeing: 11:28:35.28400000001 am

Keep up the nice work!

All the best,

Ron


On Tue, Jan 30, 2018 at 7:43 PM, Louis LaBrunda <Lou at keystone-software.com>
wrote:

> Hi Ron,
>
> Sorry, I forgot to ask, did I get the dependency stuff right?
>
> Lou
>
> On Tue, 30 Jan 2018 15:04:24 -0500, Ron Teitelbaum <ron at usmedrec.com>
> wrote:
>
> >Hi Lou,
> >
> >Very cool.
> >
> >Just for fun, you can get user lat and long from the resulting dictionary
> >by using the following:
> >
> > (WebClient httpGet: 'http://freegeoip.net/json/', (WebClient httpGet: '
> >https://api.ipify.org') content) content
> >
> >:)
> >
> >All the best,
> >
> >Ron
> >
> >On Tue, Jan 30, 2018 at 2:40 PM, Louis LaBrunda <
> Lou at keystone-software.com>
> >wrote:
> >
> >> Hi,
> >>
> >> I have created and uploaded my ClockAndCalendarMorphs project on
> >> SqueakSource.  It depends upon
> >> another of my projects, KscAstroDataApp.  KscAstroDataApp is used to
> >> calculate sunrise and
> >> sunset times displayed on the clock and calendar.  Latitude and
> longitude
> >> are required for the
> >> sunrise and sunset calculations.  If you don't supply them, no attempt
> >> will be made to do the
> >> calculations.  In that case the KscAstroDataApp package should not be
> >> needed.  Anyway it is
> >> probably best to download it too.
> >>
> >> I'm new to SqueakSource and I'm not sure I defined the dependency
> >> correctly.  If not, I will
> >> fix it.  Please let me know if you have any problems.  The code below
> will
> >> get you started
> >> testing/playing with the clock morph.  The latitude & longitude are for
> my
> >> location.
> >>
> >> The #initialize method of ClockImageMorph has a lot of comments about
> the
> >> options of the clock.
> >>
> >> Have fun.
> >>
> >> Lou
> >>
> >>         | c |
> >> "       c := ClockImageMorph clockFace: 'path2picture.jpg'."
> >>         c := ClockImageMorph new.
> >> "       c setTestMode."
> >>         c desiredExtent: 1200 at 800.
> >>         c setIncludeCalendar.
> >>         c latitude: 40.66296 longitude: -74.535398.
> >> "       c beTwentyFourHourClock."
> >>         c setUseArabicNumerals.
> >> "       c setUseRomanNumerals."
> >>         c setAddCirclesAndTicks.
> >> "       c setUseFancyHourHand.
> >>         c setUseFancyMinuteHand.
> >>         c setUseFancySecondHand."
> >> "       c beFullScreen."
> >>         c setShowDateTimeInfo.
> >>         c numberColor: Color blue; circleColor: Color blue; tickColor:
> >> Color blue.
> >>         c hourHandColor: Color blue; minuteHandColor: Color blue;
> >> secondHandColor: Color blue.
> >>         c calendarTextColor: Color blue.
> >>         c open.
> >> --
> >> Louis LaBrunda
> >> Keystone Software Corp.
> >> SkypeMe callto://PhotonDemon
> >>
> >>
> >>
> --
> Louis LaBrunda
> Keystone Software Corp.
> SkypeMe callto://PhotonDemon
>
>
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20180131/2c678012/attachment.html>