Yeahh

Yep, the Trump Train is a rollin'.

Glad to be onboard.

Trump 2020, Keep It Great.

Jehocifer

2018-07-27.

Two Red events happen.

The Lunar Eclipse from 19:30:15 UT to 21:13:12 UT

The Mars Opposition at 05:00 UT.

Eastern Pacific Basin - 5N to 45N and 180W to Americas Pacific Coast.

Atlantic Basin - 5N to 45N and 10W to Americas Atlantic Coast.

The Atlantic Basin temperatures are running just under average.

The statistical range from the blue dashed line to the red dashed line is 96% of the data for the time period 1982 to 2017; 48% above and below the average.

The state appears to be coming to an end.

Either by choice or by voice; a noise so loud it's drowned out the voice of reason.

Just thinking out loud.

Have a __________ Day.

Jehocifer.

Had another one of those reality dreams.

I'm absolutely amazed how detailed and real these dreams are: the touch, sight, color, sound, smells.

Everything down to the smallest leaf on a tree, the glass in the windows with the reflected light, building architecture, hand rails, carpet, people, wall texture... I could go on forever.

Anyway, it was the content/event of the dream that made this one different than most of the other alternate realities.

I was in an office/commerce building that had a restaurant/coffee shop down a main hallway; near ground level.

The dream became real just after I went up a flight of steps and was heading to the coffee shop.

As I walked the hallway, it lead to an area with windows viewing the forested place near the office building.

I stopped by the window and as I was looking out, I said to myself, "I'm staying here this time, as long as I can."

I stood there for at least 5 minutes then realised I was heading to the coffee shop to check my lottery ticket.

Walking to the shop, I decided to browse a bit in the shop before checking the ticket; I had a feeling it was a winner.

After wandering a bit, I made my way over to the ticket scanner.

I pulled out the ticket and waved the barcode under the scanner light and waited a second or two.

Chimes began ringing from the scanner and an automated voice said, "You're a winner."

I looked at the display and it read as, "You've won the Jackpot, $209,000.00 !!!"

People were looking at me wide eyed and surprised.

I smiled and left quickly.

This was a place I've never seen before and the scanner did not look like any scanners we use here in MN.

Joyous or Scary, doesn't matter, my dreams have a history of happening in this world.

Interesting thing is, so do my daydreams... Or is this the dream.

Life is but a Dream... ?

Jehocifer.

Well, here's what we're usin'.

____________________________________________________________________________________________________

Function StringDecompress(str As String, n As Integer) As String

  On Error GoTo exitfunction

  Dim temp As String
  Dim c, i, j, strlen As Integer
  Dim nums() As Long: ReDim nums(n)

  strlen = Len(Mid(str, 2))

  temp = ""
  For i = 0 To strlen - 1
    temp = temp & Mid(str, strlen - i + 1, 1)
  Next i

  strlen = Application.WorksheetFunction.RoundUp(strlen / 2, 0)

  If (n < 2) Or (n < strlen) Then GoTo exitfunction

  For i = 0 To strlen - 1
    nums(n - 1 - i) = Val(Mid(temp, 2 * i + 2, 1) & Mid(temp, 2 * i + 1, 1))
  Next i

  c = 0
  i = 0
  For j = (n - strlen) To (n - 1)
    If c < (n - strlen) Then
      If nums(j) <= 9 Then
        nums(i) = nums(j)
        i = i + 1
      Else
        nums(i) = Int(nums(j) / 10)
        nums(i + 1) = nums(j) - (10 * nums(i))
        i = i + 2
        c = c + 1
      End If
    End If
  Next j

  temp = ""
  For i = 0 To n - 1
    temp = temp & Format(nums(i), "00 ")
  Next i

  StringDecompress = temp

Exit Function

exitfunction:

  StringDecompress = "Error"

End Function

____________________________________________________________________________________________________

The data pasted into Excel must be of a format that has a single non-numeric character at the beginning of each set of compressed numbers.

In this case, we used the middot '·' character, but it can be anything other than '-', '+' or a natural space hex code 20 or escape code \x20.

This causes Excel to treat the string of numbers as a string and prevents Excel from trying to convert the string of numbers into an actual number in Excel.

The usage is =StringDecpompress(str, n), where str is the cell containing the compressed string of numbers and n is the pick size of the desired separated number set.

Below is an example where n = 5:

From our viewpoint, it's called Sabotage.

http://www.foxnews.com/politics/2018/07/13/in-uk-trump-throws-fuel-onto-britains-fiery-political-debate-over-brexit.html

How do you decompress a number string from this 68223031 to that 06 08 22 30 31?

Well, it really isn't hard.

First, divide all digits up in to groups of two, if one is left over, that's ok, like this, 68 22 30 31.

Now, knowing this is suppose to be a set of 5 acceding numbers, we can see 68 is out of order.

Next, divide the 68 in to two numbers, 6 and 8.

Last, add the leading zeros and tada, 06 08 22 30 31... Mathemagical.

Here's another one, 2673442.

Divide up, 2 67 34 42.

67 is out of order, so it becomes 2 6 7 34 42.

Add the leading zeros, tada, 02 06 07 34 42... Bob's Your Uncle.

Have fun.

..., but not good enough.

We need hyper-ultra-fantastic numbers.

I think if I won more than $100 Million I'd be doing a lot of donating.

I had a lot of fun at the Summer Games Done Quick.

Donated my fair share.

Jehocifer.

https://www.msn.com/en-us/movies/news/summer-games-done-quick-raises-over-24212-million-for-doctors-without-borders/ar-AAzukka

http://www.playstationlifestyle.net/2018/07/02/summer-games-done-quick-2018-raises-2-1-million/

http://www.vgchartz.com/article/277063/summer-games-done-quick-raises-21-million-for-charity/

My sons and Me (Sun Glasses) at SGDQ 2018.