Base64 sample

General Macro Scheduler discussion

Moderators: JRL, Dorian (MJT support)

Post Reply
User avatar
JRL
Automation Wizard
Posts: 3532
Joined: Mon Jan 10, 2005 6:22 pm
Location: Iowa

Base64 sample

Post by JRL » Thu Aug 30, 2007 9:55 pm

Hi all,

Here is a sample that shows one thing the new and now totally
documented base64> command can do. You will need to be running Macro
Scheduler version 9.1 to run this script.

This script will animate a little earth and moon in a dialog. There is a
button to pause/resume the animation, there is a memo box to enter the
number of seconds for one complete cycle through the 24 images that are
he animation. there is also a box that will open the website where I found
this as an animated GIF. The site claims that this animation is free to use,
If you have any information to contradict this statement let me know and
I'll remove it.

The cool part is that the animation images are all included, embedded
within the script in a base64 encoded format. They are written to the user
temp directory as numbered jpg images and then called sequentially by
the dialog causing an animation. When the script closes, the jpg images
are deleted.

The forum wouldn't let me put this all into one post so I've broken it
into two separate posts. If you want to try and copy this script you must
copy both halves of the script and paste them together in the editor.


Thanks for listening to the users Marcus, this is a fantastic new command.

Later,
Dick

Part 1:

Code: Select all

VBSTART
VBEND
GoSub>Clean
GoSub>CreateJPGs

Dialog>Dialog1
   Caption=Earth
   Width=190
   Height=210
   Top=CENTER
   Left=CENTER
   Image=%TEMP_DIR%earth\earth_1.jpg,0,0,180,85,NextImage
   Button=Pause,55,155,75,25,3
   Button=http://bestanimations.com,0,85,180,15,4
   Label=Approximate seconds per loop,22,110
   Edit=msEdit1,55,125,75,2
EndDialog>Dialog1

show>dialog1
Let>k=0

Label>Loop
  GetDialogAction>dialog1,res1
  If>res1=2,EOF
  If>res1=3,Pause
  If>res1=4
    exe>http://bestanimations.com/Earth&Space/Earth/Earth2.html
  EndIf
  If>killflag=1,EOF
  Add>k,1
  Let>dialog1.NextImage=%TEMP_DIR%\earth\earth_%k%.jpg
  Let>cycle=%dialog1.msedit1%/24
  ResetDialogAction>dialog1
  If>%cycle%=0
    Let>cycle=0.001
  EndIf
  GoSub>CycleTime
  If>k=24
    Let>k=0
  EndIf
Goto>Loop

Label>EOF
GoSub>Clean

SRT>CycleTime
  VBEval>Timer,TimerStart
  Label>TimeLoop
    VBEval>Timer,TimerNext
    If>%cycle%<{%TimerNext%-%TimerStart%},ExitTimeLoop
    GetDialogAction>dialog1,res1
    If>res1=2,ExitTimeLoop
    If>res1=3,ExitTimeLoop
  Goto>TimeLoop
  Label>ExitTimeLoop
END>CycleTime

SRT>Pause
  Let>dialog1.msbutton1=Resume
  ResetDialogAction>dialog1
  Label>PauseLoop
    GetdialogAction>dialog1,res1
    If>res1=3,Continue
    If>res1=2
      Let>killFlag=1
    Goto>Continue
    EndIf
    Wait>0.001
  Goto>PauseLoop
    Label>Continue
  Let>dialog1.msbutton1=Pause
  ResetDialogAction>dialog1
END>Pause

SRT>Clean
  Let>kk=0
  Repeat>kk
    add>kk,1
    IfFileExists>%TEMP_DIR%earth\earth_%kk%.jpg
      DeleteFile>%TEMP_DIR%earth\earth_%kk%.jpg
    EndIf
  Until>kk,24
  Let>RP_WAIT=1
  Let>RP_WINDOWMODE=0
  Run>cmd /c rmdir "%TEMP_DIR%earth"
END>Clean

SRT>CreateJPGs
CreateDir>%TEMP_DIR%earth
Let>WLN_NOCRLF=1
Let>e_1=/9j/4AAQSkZJRgABAQAAAQABAAD/2wBDAAYEBQYFBAYGBQYHBwYIChAKCgkJChQODwwQFxQYGBcUFhYaHSUfGhsjHBYWICwgIyYnKSopGR8tMC0oMCUoKSj/2wBDAQcHBwoIChMKChMoGhYaKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCj/wAARCABVALQDASIAAhEBAxEB/8QAHAABAAICAwEAAAAAAAAAAAAAAAUGAwcBAgQI/8QANRAAAQMDAwIEBAQGAwEAAAAAAQACAwQRIQUSMQZBEyJRYRQycYEHI5HwCEJSscHRU6Hx4f/EABoBAQACAwEAAAAAAAAAAAAAAAABBAIDBQb/xAAkEQEAAgICAgEEAwAAAAAAAAAAAQIDEQQxEiHwBUFhkRQiUf/aAAwDAQACEQMRAD8A+W0REQIiICIiAiIgIiyRxbslzQ3a43uDwO/pfhBjRSMNN+a1rWscGyHD+T8uOc+ljbn62lNM0iSpijdUMLGkgtdIMNwB6WzYDN/1QVpFdqjpyNsThJE0bhuaY8m/Fvb7/oSoWv6fnhjdLTnxGNvuYSNwI5AHfGVOvuINERQCIiAiIgIiICIiAiIgIiICIiAiIgyReXzkHvtN7Z9ft/pZLB0flH5gIb5f5sEdv2efW/HYM3C4xb1Gc4x37lZqFrJJm+Llh+Y/a59Pp9+6yiEJ3pCm+Lc+Is3RkkXaDcgd7f8AvPsrhpFG+niljbVwPcI7tje61/bzY59+c5Kq8deI6VsFCyzywNfLaxOOAOw5/RSmnUT5Wgukc0D5QCR25P77hW8XH3G7Ndr69QtsLKHUKtkcLTGwguLAQBG4vsQb4ODzcL0a7oL9NooWRzNlFQ/fucy48pIt/UM3zbN2+igaNz9O1Bk9NF4wsQ+NxNi30J/zzdbOmhOrdI6dX0wc+lgmdEWhg3Rd3Nxi557XBHsFjn41sOrx189JpeL+vu+duptJ8CR1TFba4AkDv7/Xg/dV1bs6po6anqTFUQxVJYGuG1++J4wSwlh+XbYEAtIJP1WmKuE09TLC692OLcrDNhtWlckx2VtuZhiREVdsEREBERAREQEREBERAREQF2ibufYO2mxIP0C6rtGWh7S8XaDci9r+yDI5ws2wwLEji/bGM/7uvXRjDndyec5/eF5S/aS6MBu3ILXHk/s++e9lNUbKF1OHBz2SbvM1nygduc3I/X2W7HP9mM9PXSRxxlzjaRw8ouDtuQpvTqhzHOIaSHY54Pt37r0dIN0k/EmvcwMf+XHFJckA38xIIyLDuL+ykiNLEjYqZn5+43luREDcnyg5tkDPp3JXawREz4zEyq333tIaqaamq2w6fMyoiaxu+drS1sriLkgGxAzbIBxkBd9E1Ko0zUaapZZ7I52TOif8r9rgbH2NrG3YkLzxzxUzmvhET7sMD2OjDiRaxeC8ENcRexF7ZIthcicRsfFFGw05k3hsjGl9hcAF4AcBY5AIB5tcBdfDhranhNdx+fn6Vr3mJ3tsOn6c09+pahrmsiKmoY5HxVVI/bZniDZuieSQ4tJlLbAm8Lf6wR839d6a/Supamlkc1722u5oIDuwIBAIBABsQDnhbRhlnq6mRr5mAzbnP8R4Yw/zfQZGOPay1r+JVe7Uus6+Zz95aI4i6+CWRtabe1wbDsLBef8AqXHtx61pM7/H+a+SuYLxeZmIVhERchZEREBERAREQEREBERB2jbuOSQ0cm17fX2upuhgMlSyKKKJ0bza20FxAbfOfXbxzz3zG0QZtuS0OBJPqAGnj07m+ePoDZOlI5pa2NtnOLbXvduTYADtgkg/T7INl9NdG0moU1JSVtDG6OfawYu4OLCDa5G3PcXPHpjXv4p9B1PROqQ2vJptYC+mkJuRbljsDIPtn7Fb16FgfNROp9O3PrYJGuEZFmuBb5iCeSCPlzut9ApL+JOgin/CF9ZUxxfEiqhqY5dxL33cWZuP6Hs759BZEvkUO8t75vnNj68/+/2UhpwBY4BwaWkXwbm988cWH/ajGuseT6/fspTSauOnLopmXiJBve1ibDn6Zv2WyltTtjMLtU6CaXRKKvhnNQKl5aWNbmM2vtOb8AEHuCeLZ5p2up6jw5o3RyM8pY7Ba70I9e2VKdLdQUlG74dzXCneQXF4zcG4445v+7Kbd05LW1zarS/CLJJPEZI2U5u85Fm88E5sLE+i7PD5fj6v+1XJi30ggVma6/Cs83R2vUNDOJ9JMsbh43xdrsha35nbmk3Fjc3wFW9LhjnfK+tf8NBG0nLS50h4AbbF+9yQLA98Hs4udTUzE+oVbYp6cVEkNDQS1lU4iNrXHaOT2Wn6+qfW19TVSgCSeR0rgBYXcST/AHVh621mKtrH0unyF1EwhxO4kF1sgcXAJte2bXVXXmvqXL/k5PXUL2DH4VERFzm8REQEREBERAREQEREGamk2OI3FgN/MO2CP8/X0Vs6Zm8LU4bYbI5u2INsHC5tYjHe9+AcjkXpqzU9VNTODoJCwg3BHb9/4Hog+tukoWTfCNeY3Qx22R7CXSAW+Y8XJB5xnn1of8Tn4h0erso+ktFmfNBQzeNWSkt2mQDayNu3Fmgm4Hew5BWnJurdempXU7tTnETjnZZhPqNwANva9jj0UEhsXLSBe7Qbi2ey4RBN6ZqccbmtncW+YgONztbzn/4Fa4NZonxRMmq6cNZ2Fh/MT7XI9z/Za5RbaZrU6YzWJbqrPxF0el6Jh0WF1Q6RkzZDFE4vYcZJ3HaBxgdxkdxrLXepavVR4Y/Ipv8Aja65OM3Pcc4UEim2e9o1v0RWBERaWQiIgIiICIiAiIgIiICIiAiIgIiICIiAiIgIiICIiAiIgIiICIiAiIg//9k=
Base64>e_1,DECODE,e_1
WriteLn>%TEMP_DIR%earth\earth_1.jpg,result,e_1
Let>e_2=/9j/4AAQSkZJRgABAQAAAQABAAD/2wBDAAYEBQYFBAYGBQYHBwYIChAKCgkJChQODwwQFxQYGBcUFhYaHSUfGhsjHBYWICwgIyYnKSopGR8tMC0oMCUoKSj/2wBDAQcHBwoIChMKChMoGhYaKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCj/wAARCABVALQDASIAAhEBAxEB/8QAHAABAAIDAQEBAAAAAAAAAAAAAAUGAwQHAQII/8QANhAAAQMDAwIDBgQFBQAAAAAAAQACAwQRIQUSMQZBE1FhFCIycYGRB6Gx8BUjweHxCEJicoL/xAAaAQEAAgMBAAAAAAAAAAAAAAAAAwQBAgUG/8QAJBEBAAIBBAEEAwEAAAAAAAAAAAECAwQRITFBBRIT8BQigcH/2gAMAwEAAhEDEQA/APy2iIjAiIgIiICIiAiLI2MkAkixBOCO3nnCDGi32QHxGsjjDgHnJtft5nJ94YIHAxkhTFHo01QWiRmWgObYgtsGgeVs7f8AGUFYRXmXpqF0bvdYWhwxH8fIFiL9wQeePXiCr+naiCJ80Ac+Ngu4EZGbY80EGiIgIiICIiAiIgIiICIiAiIgIiICIiD7jFi15c5gvhwGceX5L7DS5jrW8S4aA0cjI7fT1K8JBAZyG447Z8vmVlp4w6RrcEXBNj2tc+S2iGEtoLHRnc5zXRAizWi4ccG/HOSO/wCS6LT6V7XQCspniB3wue55LSOPitcXP9e6q2kjT30zXVNQItm1rmtaTuxmwtcYBt62UlqOqe0uiptOh8GiiJc2NuC8nu78sK3g01rz0jveIW4yU0cO+V8VWXsDHPDz4kbieTusSDuA9Pqs+l6LR6rTOlhYRP4TyGCQ2ILDcDi9gCbF1rjOFWKDTGOhdNMXSOv3OPt++VP9LV38F1GMyM3UJmEjsAmPJ94YubAnHdT30M2rvj5mPvDWuaIn9unLOq9DbStFZS7nREN33AFyRkixOL/plVdfojr3Q6dlLXvE8UsG90cc7W7opRztuHX3bdp7/HkN5HANSo5tP1Cpo6mN8U8EjonxyNLXNcDYgg5B9CufakxWLyliedmsiIo2wiIgIiICIiAiIgIizwU4kYXvkDALG1iSRfJA7gZ+yDAitVJ0XV1dK2SCeISOF2xyWBP2JVe1GgqtNrJKWvgfBUR/Ex4yEGsvqJu59g7abEg/IL5XrCA9pc3c0HIva4QZpC3Gz4RY5ABPb9LeebrdoIHmCSW24Dkg35PccgfTv6rQcRZ1mbRfi55/d/v3Vn6chopZ2tkEBY9jmbHu2gOJ9035HzPbspaTtLWWOgi3ODsh17NVho2thDvD/nuvZrg02HHvDg37ceayO0zS4G00vtr3xPxJHDHcsNjgOODkAH+wvZ+jaLR/ZKmTUaik96RkccExO4DPvXBbgG1wCCbYxddrFavt93araJ32aGjuYaiCKrndHTOlAklAL3RtvZxAJzYXNluatJDJqVT/AA8ubRh5bECbktGAb2BzzkX7FbVRU6ZLT+z0dLFBK4N8SreCG+oay7tovbI94gcC5Wt7W+GkkpaeR4p59r54mkhjnN3bbdzYOPPc8YBXXwY43i0Vn75Vrz43S/SUDZ26hR6hUOgopIRVuvFuEhjcW8gEj3Xy5uBfm/C5P+Lex/XeoTxQmKOY7m+9u8QNuwPvd1y7buJ3EEkkG1leJp5nwiJ0j3RtAAaTgWJtj/077nzXLurnh+v1IaSWt2tF/wDqCfzJXK9awRSPk8zP+LGlvvwh0RF55dEREBERAREQEREGWmYHzAOF22JPyAJv+/seFN6RTw1tZCQzxHA7ib7bkkm5sL3x8hn0JidOftqmNIu0uBta+Qbi3r2+qs2gt3VsbqcjdbaxwFyxuQDccjF7fO6DtnQ1FRsracVsLInPi8UhziHNcWjnjcABc2xix8l8fj10VDXdE1HUEELWVulz7HuZFtMsRcGkWsDtBu4E9gcC9zsdFth3QPe8N9lY3w5wQNrRngjywMWAvfjFz/1A6tQaV+FesuE5fWVwjomgnaRJ7oLdoFh7gkPob25uDL8VoiIwyh3u3vm+c2Pnz/n9FvaebtIGLAE+ef7BRzXWPJ8/r2UhpNUyFwZICYr3ybWccfbv9PRSUttO7WYWSggkfFTmRwZFK4hhJv8AYc5OAT3vnBte9a6Tn0Cl0ir8ZlZDqMW+AwZscXYRzuFwDyMjKgdMqtGlpmRzRSRFh/2i54Fr9iLi+eMWHK6h0h1dpVJHBp7pP5LSHRPLjG6MgW3McLAGwGMg/PK6mLV3rtNY/iC2OJ7UCOKR8pjZE5z2hzi0C5AAuSR6AEnysV7vCucHRD6vUI2UtXTU7p3iSGN8wwMfCbAkfpfvm+l1voGq9N0lNQ6i6BhLnSsi8VsjzfDnm3wtJYMHn1INu5j9Rx8RE8yq2wSqVZVxUkDpqi/hsuTYX4F1yaqmNRUyzOFjI4uI8rlWLrDXI64so6Eu9mjDTI4uuHyAZI/4+Xy78qsLz/qmt/JybV6hb0+L468+RERctYEREBERAREQEREBTWkatHTTMknBL2tLbkbhawBxfuAPr88QqIO4aF+J2iaRAKhz6madrdohiYWn+jRaw79ybXuuefiH15q3XFeybUnllNE5zoqZrrtY53xO7AuPc2HyCqSICIiAvWkC92g3Fs9l4iCb0zVIoiBUOeMmzrbiBzn9MBW6j1KhZGyV9dSXN7sLxcW9PyXNkUtMtqdNZrEurO610ij1GKoqNtfaUSSxxxA7u5BJAFr2wD5qqdbdb6h1TXTSvaKSmfYCCM8NDQ0NJsLgACwsBxjAVURZvnvfuSKRAiIoWwiIgIiICIiAiIgIiICIiAiIgIiICIiAiIgIiICIiAiIgIiICIiAiIg//9k=
Base64>e_2,DECODE,e_2
WriteLn>%TEMP_DIR%earth\earth_2.jpg,result,e_2
Let>e_3=/9j/4AAQSkZJRgABAQAAAQABAAD/2wBDAAYEBQYFBAYGBQYHBwYIChAKCgkJChQODwwQFxQYGBcUFhYaHSUfGhsjHBYWICwgIyYnKSopGR8tMC0oMCUoKSj/2wBDAQcHBwoIChMKChMoGhYaKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCj/wAARCABVALQDASIAAhEBAxEB/8QAHAABAAIDAQEBAAAAAAAAAAAAAAUGAwQHAgEI/8QANBAAAQQBAwIDBgQGAwAAAAAAAQACAxEEBSExEkEGE1EiMmFxgZEHFKHwFSNCUrHxFsHR/8QAGgEBAAIDAQAAAAAAAAAAAAAAAAMEAQIFBv/EACQRAQACAgIBAwUBAAAAAAAAAAABAgMRBCExBRKxEzJBUXHw/9oADAMBAAIRAxEAPwD8toiIwIiICIiAiIgIi9FhDQ7Yg+hBr5+iDyi3BAWTdBhsl3SO5o99yKPtN5A+m6nMLR5p4pJJGOAJJJFb2KdW3cjt8ON0FXRX/wD4lF5JL4vLYT1NNE7cc7H9/FV3UvDmVjdToWulaOwFn6eqCCREQEREBERAREQEREBERAREQEREBERB7jFFry5zBezgN9vT9F7c15cQIwHGqDfTgAfP7ledvdskD6/avmtnHxhPkQwxfzXOLPZaLJscdu+3Pcd1tphL+HcKXJgcY3jZ1eWDV13v93Y9Fc9BymRsEOXjDJbRIDpKBA7d/VVbHMuJl+VkNj9j2XNA2ArtSvui/wACEePk5GS5kUezsf3nnYmhQA5DR8ib6TzarxuomY3tpN09JpGPpL4ppdSlhxZmXGHM6ndNeo5G98d6UPmZeFkalBHP+WfsGvlhaW2a7ggEH2d6oXX0j9b1SXWtQbJEzyMaNgijiado2AAVX7/yVsNwMf8AL9DGW4izyd6O5+SvRwImse/z8IZzTE9Kh+InhgafkHOwQw48gEjmsr2b52B2o7V6Ua5VFXfcd7tR09mh5gfPkzyNixHeyAXPHQWvur5bRPAB+AXCc7HfiZk2PICHxvLTa5mfj2wTqyel4tG4YERFA3EREBERAREQF9aC4gNBJOwA7r4t7AgY5nmvcb6qaADY43259K+PqQgxw6flTvLIoS54q2gixtfCxZONNjPDMiJ8TnDqaHtqx6j1HxXT/BugvyZsJgM/Q8iIlrRfSbo77bbH5Aeq6dk+BsTW9JkwszElAlcRE4xkOieTTQ11nffgDfg/Aafl1Fu63ps+j6xmadlgCfFldC+uCQasLSQF6ib1PoO6TRIPyC8ogzOcKbQ2FEji+222/wD7amtFbDDLHMZPaZ7Zkb/dfs8kd69Nr7EkQXU3pIA+55Nf7+/dW3StJinhgf5mMyJzgXkyFnS0n3r3Pccg8DYC1JSY32xLZh0uYYDdSkMpEjzuWEb3tv6kEn5DnhZ8NoIAAcTdDfurJ4dx8KbVsPTJZbw5Ynwy/lnOcZiGO6XADpsh42B2sk77qYzPCGDpkcMs+pNYwvHm4YcH5DWdYBcCAG3RO13tuOw7PGzVifbZVyVme4QkMMOMx4ZOJXkAAtYengXz9Rx2PwUjoOZFgapiZGTE6aCGVr3Rh3S4gG6B+dfbspXws3QYsjUZs/JDYWs6MWCWNz3SdR7lvSG7Cie1mt6cs2o6vpsj5MPGg6dNDvMfLE0xS5LgXEAgud0tt52JJoAkk0F1qRvdPZMx+f8AftXnrvatOgLmtmkfGGyyOb74u9iSRdge1yRvvV0a5t45dG/xFM+JrW9TGdfTdF4aA4/UgrpE8jpHOc6rdRdW1n1r15/Vcv8AFcgk13IDeGU3m+2/62qXrddYazMd7ScWd2lEIiLzK+IiICIiAiIgKZxAxuNA4dTgC0UNr3JH06rFHYkDcKGW9gZghAZLfSA6nA7gEcfcD0Qde8Ex3kYXmPHmwsa18Yb752BsVtYdvzwu+eHcDGlnLXRBzHQw9bXcgtoEihQIa4c1Q7ANFfnvwFrEEM0MjJ2t6bDi+Wm0NrNiqB+iuvib8YsDSdJyIYX/AJ3UyXNYyOUkAltW88BrXX7PvHa63Rlx/wDG4xn8UddMJd0dcfvkFwPlMsEgDe7tUZZcrIly8qbJyZHSTzPMkj3cucTZJ+qxIwIiIMwOwIIJPJ6qPb/s/ulv6XMYw4McWEtp1EgkH/PAKjGuo8n1+vZbumygPEZvpJAB9CSPvwOfRSUtqdtZhY8OZ7QHskcTuwEncAiq+VbKxYTMiTDhyHPAxfNMTeqUbPoX7N2diLNdxuoLQzBDKW5THuH9LmiwNu47c/7XT8HI8L5WlwwATxMa8usMp0ZoX6tN0D9geF2cXJiutRtWtj229S8FT4vhvRtUwnTag7UnmNscMQJjeBfRQc4uJpxBHAZuN9q27Ge3JlgLovMi6ur+a3ptoJIDronY1V32uwus+DvHGm6fH/CIi78q8CJvU1wv4toAMNk99/gVB5Gg+FczV805HiFkM/S+R35eB74vd6i4u9of3EgE77Cle43qN6bjN4/iLJgiftc01ab+HY75MljmhreujtYqwuSZEz8ieSaQ297i4/Mq0fiDrcGo6zlQ6bMZcFsh6ZenoDwDtTboNqqHwHpaqa4/qfOnlXiI8R8rODF9OBERcxOIiICIiAiIgIiICIiAiIgIiIC+tIF20GxW/ZfEQTemarFEA3J6ve2dyQ3c1f6ceit2BqOnBtNz4g517SOawHueDsNz8f8AC5sikpltTw1msS6nkeLdL0x5GPlyTyNLQDih3zsF3SB/TwqlrXjPVdSwpsFkrsbBmc10sUbz/N6RsHnuAbNcWe9Cqyi3vyL3jUz0xFIgREUDcREQEREBERAREQEREBERAREQEREBERAREQEREBERAREQEREBERAREQf/2Q==
Base64>e_3,DECODE,e_3
WriteLn>%TEMP_DIR%earth\earth_3.jpg,result,e_3
Let>e_4=/9j/4AAQSkZJRgABAQAAAQABAAD/2wBDAAYEBQYFBAYGBQYHBwYIChAKCgkJChQODwwQFxQYGBcUFhYaHSUfGhsjHBYWICwgIyYnKSopGR8tMC0oMCUoKSj/2wBDAQcHBwoIChMKChMoGhYaKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCj/wAARCABVALQDASIAAhEBAxEB/8QAHAABAAMAAwEBAAAAAAAAAAAAAAUGBwEDBAgC/8QANxAAAQQBAwMDAgMGBQUAAAAAAQACAxEEBRIhBjFBE1FhInEUkfAHIzJCgbEIFVKhwWJy0eHx/8QAGgEBAAIDAQAAAAAAAAAAAAAAAAMEAQIFBv/EACIRAQACAgEEAwEBAAAAAAAAAAABAgMRBBIhMUEFExTR8P/aAAwDAQACEQMRAD8A+W0REYEREBERAREQERc7Ttvx+v8Ayg4ReuBh9cCGMuIPDmfUa55vjkWPA8dlP6Xo8+Tbdrg4/V9JAFULIJHFlv8ASvFFBVUWgx9ItnL4hju9RpAoHcewHBJBP2Hwq/rHSudgfU2KRzfALTZ7duOe6CvIiICIiAiIgIiICIiAiIgIiICIiAiLltWNxIHkgWg/bGFpY9xcxpNhwHt7LmnveQ2MNc6qA479gPuuCQaDqscf/KXu0zGbkZ8MIdYdV15tpNcdueL+fhZ0w9mjMY1sfq5PpseRwxhI8G745557+3hXjFxsrBfDlY8jJ4STteHfxuI53C7uuPbj3VYwcTM1DK/B48ZmlZf0R9uLJI/qpnRMmKLI2ZjZJMfaeGGnNPBFHxyAr+LiTaN+0Vsup0vmjY+J1DMzFfC6DKe0tZsk+p5HNGxRBrt34qxwF4+oJcLFZ+HgyZXSsLmOcWBzZHChYI5HAPwbHayTK4+r6VomLPkYLmTahJRxiW7jDZde81ThW328813qOnxs9b1JX2S4naR5Pf8At+uFbw8LriZtHZHbLrtCq9ZaK2bFOs4UbmndWXEG/wADj/Mfubv8/JqlLZsuNkAmlewvjljdC+M9ntIog155v4IB8LH8yH8PlzQ2TscWgnyPBXP5XFnBO48Smx5OqHSiIqiQREQEREBERB2Y8RmnZGLtxqwLr5U7o2k/iHsY+K7cG2ASXHkju22/aua8DvFac3l7zWxpbYoWfcc+KB/54tXvondNkYboWSAVtcQBwTVNvjuOa9j29wnIOgMPOwC7Ix2wbGut8bqcCAb4qidzSDfzwsy6n0PI6f1Z+FkkPFCSKQdpGHs7z7HyeQe/dfUnTuAQ/wBL12bHRNdGyMBwtzbO0Actr8rO2uFRv8TWnYcOk6Nkw4/oTMndEAXhztpYCd31Hy3j2HlB8/IiIC/UYLngA0e4K/KIO47GxN22Te4g+3ivfz+rUv09iTvnZMxji2SwHuFtuiCOeL/qoW2mg1nP35v9foqzaCYp58dkuxkLnNY+wXOa3k0BRPY/PYduQpKeWsrrhz4+mPmfpWRLjuGM9r5G/UC5wBof9VA/kfbjpydBysDTMLMna8x5bBJGfTO02LAa6qJruP8A2pHA6GzHSYTS6PEhnDj6r5gxjBX0g3zbnA1RPBuuFaem9P07L1n/ACbUMebKw24sojix8k7nZADGtlYRYc0gBre44Jo1z1OPetI3Xv8AxBeJnyomGwCg4hlmjfNfKlZ42NJjxTJLjte+pXM2+oB5r+Xjaas1ZVs6g6Q0TSdPwsyLWpSycgOx/SbM+Mf9zXBu6qIaa78kLjp3XNG0zRtSY+DL/GZUjjGxrhTGBhDR6gpwJLnAkdxdhdrHli9OvHWba9Ks11OrTpXbyhpUeHkRuZhCX8Q6T0zvaOIyasWAeB82LHKyTq9kbNcm9JgYCASASRfY18cfP3K1vWtWydXy58vMEfryOsGMbAxvI2NaOA3n2v8AM3kXVkol13IqqZTeD8c/72qXzNJrhjqjXdLxp3bsh0RF5peEREBERAREQenAnEGS1zq2EgOPsLBv/ZXvoSeOHPiZLcg7293f/SQPvZ5v8u+drvxszIxXtdBM9jmggEHsD3pDb600PW4sgCKPdvsxveB6ZDC0VuJHsR57tqubWJ/t066h6t1fCwtPkMuBprXNE18TSurc4AcEfSADVnnkiqoebr2qZuOMfJzZnQC/3bTtabruBQPYd1GICIiAiIg7geAQQSe53UfH/J/VKU0bM9Ax/S0GL6gW019n5rn+vjhQ7TXBqufCkNJkY2QB9FtgAHvbuOPB7A8+3Hut621O2JhcIdSyzh5EQzpZYZKBY4buxDgRfLfuOfzXtwc7JZJHM2aQuaz0mlzt21tVtF+wPbwopuN9H7sVQFVdEV/cqe6UyNKhkY7URK+TeAGhoLdpPN32Pf37j5XZ4eanRuI2rZaWi3dJ4mLK/HxnTyiHDle5rJHHcOBZO0Wa5oGuSCB2NaD1d+zt+k4mDlYHqyac7FOVk5UhsxEcltAAcgsDR3J3XQ7DqvR5xMB0eJkERte6MxxiN8fNiMncLAPltg2fdWCDrfT9S0PN03Kw8uLCc0RMhijtzyT/AAt+o0XWR3HBPZWf2ZazW1I1EeY/3tH9VZ3EsTz54cfT5p3ybTG1ziCODVUBzyeTx8flkU8rppnyyG3vJcVon7YuqtK1nUY8DpzGMWFBzPO6T1HZEvNndbuBdXuINXZFFZwuZ8lzv13jXiE+DF9cCIi5qcREQEREBERAREQEREBERAREQFy0gXbQbFc+FwiCc03V2xRPime4NdbeRuG0+/8Abt7K16fqemGD05cuPHFbRtLXgkC7Nm+Ss4RSUy2p4YmsS1DJ6q0bEYfTyJchzS1vpsjvd3s2TtHgcE9+PindQ9UZer3Exv4bEsH0mG7NUbNC/PHz5UAi3vyMl41MtYpECIigbiIiAiIgIiICIiAiIgIiICIiAiIgIiICIiAiIgIiICIiAiIgIiICIiD/2Q==
Base64>e_4,DECODE,e_4
WriteLn>%TEMP_DIR%earth\earth_4.jpg,result,e_4
Let>e_5=/9j/4AAQSkZJRgABAQAAAQABAAD/2wBDAAYEBQYFBAYGBQYHBwYIChAKCgkJChQODwwQFxQYGBcUFhYaHSUfGhsjHBYWICwgIyYnKSopGR8tMC0oMCUoKSj/2wBDAQcHBwoIChMKChMoGhYaKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCj/wAARCABVALQDASIAAhEBAxEB/8QAHAABAAMAAwEBAAAAAAAAAAAAAAUGBwECAwQI/8QANhAAAQQBBAECAwUGBwEAAAAAAQACAxEEBRIhMUEGURMiYQcUQnGBFTKRodHxCCNSYrHB8JL/xAAaAQEAAwEBAQAAAAAAAAAAAAAAAQMEAgUG/8QAJREBAAICAgEDBAMAAAAAAAAAAAECAxEEIRITIjEFQXGBUWGh/9oADAMBAAIRAxEAPwD8toiIgREQEREBERARF2awuqq5Ndjj8/btB1XNGiaNDi19WM0ucDBHuf4APLb3AEn6cGwPbpTWJpshHz7wCfwgAfUg81e39NvjoBWkWht9IRy4zHvYGMc4DcXbtvjk3dcHj8lXtV9K5eIx0kBbPGKJDHAnwBx356oKdCuoiKAREQEREBERAREQEXLGOe4NY0ucegBZUxo+kOzJhG5jy/dtc2iAOa7HY9z4/UFBDItCH2emfEBhkmZPyAXNJaaN8ivahxfJA8qjalg5Om5suJmxOinjNOaUHzIiICIuWguIDQSTwAPKD0jYWlj3F7GnlrgOePbr/lcPs7iYw3o9VQ8Lu54+77SG/Esc8H5a4rjj69d+V3xITPM2NpIJHJBHVE9jr2/X6KRYPT2FI0Nftb+7uG4fK0cXZ4rm+Oeq8K1aXFiZecIcvU9hdQ+GGubGeuAfbmr/AFXyekcZ2qv+6RMD3wxna1snw9zj0R71ZIC7aXp+o6vmxwYOLNLNG0iowb4/756/QLZx+N52ny60qvfUdLbgz6hpJdjztxcthZ8TbI7c2jZIq/Fmx+fuVI5sWkjQZdUhxWtdvbFJEC9oDnAncDfF0euPH51/QtSixwxmpY4yox8zXbiJG9efbv3/AOVNeqNZw8nScTSdMZKMSFzZnyPppe8AgWASLFnnuqBsi16EcC3lFdftT60a2x71FplM++QxOYDe/wD3c9/n/f8AOurY34X3yJmntiLpnbWMYSBu3UKu/qO1kWXCcfKlhP4HFt+68/m8f0rbiOl2K/lGpeKIixLRERAREQEREH16a0HIHzPDrDRsNHngno9C/wCoV/8AQOP8U5LpAxrGjcw7y3cGnraRYtxI4/Lxzn2DKGSbXmmOIJFCjR6N/QkfrzwtK9A5OLHHumNx7PmaeLIIoAijVUeuiOOwQ1/QMbHbsMjjGXEPLWt27SeBe3skD2vz31m/+IrS4WM0TVIoXRzSMdDMS4ODvLaINGvm5Hv2Vp2jZMkEbZMP4cQMZAYypGufYDiASeCCOBXfjxj32/eq4da1jE0vEcHx6dv+M8G90jq4PJ5bR6NW4+bRLKEREQL0gDjKNhaHC3Au64F/9LzRB60wR/ism6uuPp/P/wBak8KJwe8RSh+2yHMNEjyT+vHPvx2o2WP4TzE+MiUVxd9j6fy/NT+jS40Tmh7QBRF1Yo81RaT5HPdfqFZT5cysnpduZBmRCOKYSy7ixwBAuuTQFOoD2I775WoYTYPTmfk/sPLmYRgPhme524M3uYRvI4BsuFeflqr4pOJrL5sVjIInMgxyxjS+QiOIjjcG8Dceh2R4IoVcW/Z3qDpcSLHjnZhPm+GcoGo2MJI+I7cQLDdnRo8Dg9+lj1M+7pTO4+EBL6dzMfRI9VfHM3FlNR7onUG2dtuqrIs+BTTz1fwYgi+M05DS6MWXNaaJ+l+Fq+k6Zp+HrOkaDqf3ZunPfJFl/DyXugzA2F7g4P4oRyF/+n5n+dp2x/qbTfTGgHHytOEE2oQSua/G+N95xdzdxAfuAe4n5boBvQqiSvXwcyJn07RM7+NM18X3hScfS86eJufC34UTSS17SdzQwWXAWXUAHG/9rq6WQ+r4H4+vZDZGhjiGmgK/CFs2Zr803p7G0lkUcMMRJe9gAdKS4uO7jnsAe1fwxn1dN8bX8k7t22m3d80L/nazfWKWriibxrvr8O+NMTbr+EMiIvm24REQEREBERAUjpmtZ2myNfjTGh+F3II9v7KORBaMr13r0+F90iym4sJvcMdu0u4A77HXilV0RAREQEREHuXlx3WCTVmwD4/9/a1IaTN8MBwDKAI5A7PB8d/1UUx22+SB9Pfwvu0uSNuS0ygOa5waGm7Nnr2/v/Cytoj5RMLvpuoREQzzQj4kTgGzRud2Oi4EEUBVAAdK5P8AWOsPxpYP2nJNjyRPhdHJG17Qx5DuA6w0njlvIoKuaZgNkwmbWt+FNxsuvm9r96aOvde2TjObGwMZtkijojbRcByDXvV/mtfG5OOckVtEx+e4c5MNvGZjt7tleGxVK5zWCo/mPyiyePbu+PdSmn4D5HYkskZmE73VCA/e5or5zQ5aSSLBv5XdcFdPS2oaZgzRyZmE/Ikjka9pDwGgX+64VwbHj38LRtT9a6c2LGi0nRo4/ghr4jklpMbtwPIA20Ou+vbm/oMnLtT20r++mCuOJ7mUV9suh6V6TmhzcLHAwXxCaGHeSzY394P4D3bi4fiJAHdFob+XsmZ+RkSTSG3yOLjXuVov2s/aHkeqTj6bA+M4eMKkmjBH3l93dkAloPV9mys2XznK5N8sVx2nfj/rbjpFdzH3ERFjWiIiAiIgIiICIiAiIgIiICIiAuWkC7aDYrnwuEQT2j6vj47NuQyQPa75JGOIIbzwf41wB/S24/qKKXHZDkZkAjDqI3gbgPBrnyf/AKIWaIu631O9I/pqmV6v0TGDiWzPk3hwixn7meOLI/ibJviuSqZ6i9VZmr7oox91wzX+Sx13wAbNCxdmvr57VeRd3z3t1MoikQIiKl0IiICIiAiIgIiICIiAiIgIiICIiAiIgIiICIiAiIgIiICIiAiIgIiIP//Z
Base64>e_5,DECODE,e_5
WriteLn>%TEMP_DIR%earth\earth_5.jpg,result,e_5
Let>e_6=/9j/4AAQSkZJRgABAQAAAQABAAD/2wBDAAYEBQYFBAYGBQYHBwYIChAKCgkJChQODwwQFxQYGBcUFhYaHSUfGhsjHBYWICwgIyYnKSopGR8tMC0oMCUoKSj/2wBDAQcHBwoIChMKChMoGhYaKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCj/wAARCABVALQDASIAAhEBAxEB/8QAHAABAAIDAQEBAAAAAAAAAAAAAAUGAgQHAwEI/8QANxAAAQQBAwIEBAQEBgMAAAAAAQACAxEEBRIhMUEGEyJRYXGBkQcyobEUI0JDFVJicsHR4fDx/8QAGgEBAAIDAQAAAAAAAAAAAAAAAAEEAgMFBv/EACkRAQEAAQQABAQHAAAAAAAAAAABAgMEESESEzFBBSJR8BUjMmFxgcH/2gAMAwEAAhEDEQA/APy2iIiBERAREQEREBEWbGFwsFo+Z+X2690GC+0aBo0eLW7jxESDyo5HEGg4No83TuvxaftyOpmtP0maVlkP2lwaSwcNPF9jV0K+XFcgBV0XQMXwg3OxjtjLJARtaSXOdVCr61wR7fa1B6t4UycTc7Gd5oH9sin9Pbv/APFPAraIigEREBERAREQEREBEUhpkDXDzXEbg7a0E7ee1H3/AFFcckUHnj4Es0L5Q1+xoDraARViz14q/lwbpeE+PJAQHg8gE8Hi+3zXXvCmmRAxsfF5kTiCSHUdgAIJs2LAPX7qoeMtIOkeIc7Bc8uYHB0YPRzTTgG3Y6lrb6GjfItBS0Xpkx+XM5vFcEV0oix+680BEX1oLiA0Ek8ADugybH+UybmxuunV1r26WspASCdrRwDxxtHYfHse/wC6zjex0bWPAsvAJ4Hp+Fjj52OvNrawoiZQY42uY40NxsWQCQSKI446HrXupEto2C1h4t7XctDwASeBxfTm+12B7WrzpuO9mLIIvJxY22ZJ32SHEf0ACyeOgHc8Kv4bJZIGthj2MbZj2tPXngEmgO32u1dtDx5vEuFqUeO4TTQQRxQtEnlkuLwHPAPJv097qr6EjPDTuXfsi5SPHScTC1BsjcXVRHmAtLhkMcxvpHFHnjlS2JPLLmMZqkLM6EWwNiYP5XxbwKPSj0NEfFtf0rQ9R1vKzZoMZ8n8PA/Jlvd6Wt6m3d+vframtB8TSafNAcnHin8p25soG2ZpqhTxzweR/wC12/w/5fl7v0+ip53fblPjnRnYerag9uz+TO6OTY0NBpxbuAHawPvaqi69qpbqWTn5GQ1rXZMjpHMH5SXOsgew5K5PlwnHypYT/Q4tv3XP3218jKWelbtLU8c4eKIioNwiIgIiICIiApHSn29kbd27cXek0aq/l1AHbr34qOX1ri020kGq4Qd58LSRMjE8bzK9zuhJO/bQ7dgaNDk9h3VX/GJ7ZfEmOQHNdHggOBJJDw6Q+vrfDv1F2CCqxofjTL0twc6Fsz2gBpLqAoUOKIvryFE69reVrWbNk5LiHSkOe0HgkcD6VXHwRKPyyHZMhabF/D/s3875XkiIgWUbXOcAzr1610WKIPclgi9LS0nrTiLbx9+Qfqp7R8HIyTFDhsErpHbNzQNzySRRJFe46/XuoFsTnNpsLy7twfrZ+B/flWzwziOmZHHj5DxKwgtax1A3ZBPtXvXce9DOIS8sWVixiF2O+ORj3sEg/NI5pLT3N1VWOB8+VPeA5podVZHhMkfLO8MjDASGkkDcWgHcRfSjfSjdLT0v/D8DJMeU8SyNlLH3GJY5G8Gt4cHE0XDptsjp1HQsXX5M7S5cTTcFrsfDjeLhhcyFgJ9Mr3b6prQ4jd1c4DldPbZSY3CT192jUnN5tTmVjaR4aypsXEzMiB2RpUmPIJDudG13q9beDbnF3tVtrglUrM8NiPwpDrOPIyRjngSM85m+IFz2t3N68+Wa9+fbi7t/DzOy9Kh1HTAx/nFmTJLJkPjNuaCX1yHbCXkEEEf6wtvByNF0HWtFxW5WNPp2K7JH8SIvMbO0wy7g8t5eG7o2AhvquTp+UXdPW8uflXm+/wDU+/vlqyx5/V05Vo+HkalI3AxmvMeRLE2R7I9xbbtguuQLeOLAJrvS5f8AiBhRaf4t1DGx5DLExwAeRV0AD+oK734m13G1SfAh8IYc8Ewf5h8qFrZpXhwDbDBybaCGgUOKANr8+eMcg5XiHKe57pHWAXONkmuf1tYfFbc9GZ5Tjv0907eSZWTtCoiLz64IiICIiAiIgIiICIiAiIgIiINnHlbE4P8ALY4/7qrp7/P9Pqt/SZzGwAbRGOoPcmxfHUgXXz+8Sx22+SB8PfstrBlaycGQAMcdoJ/p/wCOtf8ASzxs90VdcTOa9jfOY1wcCSGEtG4U0GuO1/DmlZ8LUsIYLIJMJ7ciN/qyIckCxYobQ3aQPV1s+rrQCqWi48c0rRK8u2EExnje2vnwe3/ldUwNBdHp+NHBjNbFkxjaHEBz7scn3I5+v0Vm7rS0LJjLf4MdHLV7tkZHxXqTtr4Nb1ANY30NZkOjbRFU3kAc38T9FWomT5j/AOWySfJeS4hoL3v7knufmt7VcGGLE3RhsIh42H9vnf6lbvhDxDL4emhmhwMYyhxkbkztJJFCgBYoCjz7n2BJ7Xw/d6fkXU0u76d/6p7jRymfhzWDTtKPhPG1TP1uPycKPR5XTvL7810sTtrGHivzBtc24E3W2vy5kSvyJ5JpTckji9x9yTZV9/FT8Qs/xdmmA5LjhRmg1npYaPAAHUDjk30HsFz5cXe7nLX1ObVjSwmE6ERFTbRERAREQEREBERAREQEREBERAWTXbb4BsV34WKIJ7S9WgiG2XdE4GmObdAXfNfXoPbj2urPEmPsh8nUAySIFokOSOW1yCCAf8tdQAOi5YizxzsRY6vmeO8SAw/xD2Zpj/txM4BLfzc+m+G8i6+fSl+J/FeRrUj2wY8en4jusEDnG+OjnE2R14+9nlVxFN1cuPDOp+xxzeaIiLWkREQEREBERAREQEREBERAREQEREBERAREQEREBERAREQEREBERAREQf/Z
Base64>e_6,DECODE,e_6
WriteLn>%TEMP_DIR%earth\earth_6.jpg,result,e_6
Let>e_7=/9j/4AAQSkZJRgABAQAAAQABAAD/2wBDAAYEBQYFBAYGBQYHBwYIChAKCgkJChQODwwQFxQYGBcUFhYaHSUfGhsjHBYWICwgIyYnKSopGR8tMC0oMCUoKSj/2wBDAQcHBwoIChMKChMoGhYaKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCj/wAARCABVALQDASIAAhEBAxEB/8QAHAABAAIDAQEBAAAAAAAAAAAAAAUGAwQHAgEI/8QAMhAAAQQBBAAGAAUDBAMAAAAAAQACAxEEBRIhMQYTIkFRYTJCcYGRFMHRBxUj8YLC4f/EABkBAQADAQEAAAAAAAAAAAAAAAABAgMEBf/EACYRAQACAgIBAwMFAAAAAAAAAAABAgMRBCESEzFBBSKxUWGhwfD/2gAMAwEAAhEDEQA/APy2iIiBERARZTjTBod5bqPHAs91yPbnhYkBERARF6DSWl1ih/8AP8oPK+0aBo0eLW7DE5k4ayKUvBIB2EEd+rviraf467MxgaXLKCCSCTVtAAB49/ayG18UOugFZRX0+E22W5ETo4ml3r7cdvF8/lqvrg89KK1jwdnYjDNhNdl41XujFnrnr9D8dIKuiIgIiICIiAiIgIiICIiApPEg8qIPe5jZCBI2n7Xbfs+18Dv8x+FGKXxz5mLxI4OLA1ocO6oUPgXQ+D7ji0GZs11I3bK8Oc5pL6qwT79CgaHA7+AThzcRjsZzom05gLvwgEi+b+DRB/boLPGHu5B83eLrd+IDmrsgi6B+PuyTikO23bajYenuvcAHXY/LfpFVxuqueQhkREH3aauuDfKyOs7y6MNFA8cVxxXz7H54WRjmloilbtdvDXdA7fgWOP1sd8qU0DBOdnlgd6H1Ze7cCSL745HN/rSDb0fTedzTIIrLmhwBs8N/nkivk17WrtomC7YyN0TWtBDnfm+OT8dfh5+l9wcZumjbJh+dALEZAPA+RV03kfH2t6IOc6FmIXxuvcxzmAu3XxQuj1X6/wAKkzPlEQ0rWJiZlv6jib8SHI1GMxQG44ceCMCSaqt3XRDe/wC3K15mablRiTAyMyGZzgHYsjdx3D2sHk37fYVp0HCk8YZGTgwTQ/17YYYGjIkLWvczeHn03yQbHY/Xgiuab4YzNSx9YkAZEcCB+TIx9Cw1wDgAOiPr66sL2+JxKzE1yzqY/tx5cne6ue/6h+G5sExaoMZ8LchxZKzYQA8AEu56sOaa+yeBSo665q00+dhNxsl/mQB34XAe4De++gFynNgOLmTQONmN5bfzR7XNzeJPHmJn5WxZPNhREXA2EREBERAREQEREBZsaYRbtzdwPIH2Or+RyQR9rCiCSM0A5jlbZB9UhduBNUeG9igffn+VrZeT5rnCO2xE3tNf2HVAcfS1kQF7iBdI2vbnuuue14RBmj2AAusVXLRyRfPf7j9v1Vt0KKDDbE4Oho7T5rzXd8mr45+DX12qpEGuefJiLyBxYv8A8j/jr+9k0tzcuCPHiEnmgbtvAYKAIHPvRPKtEbQ6EZoY4Q6F0k9hvclsYB0aBFkGqsVz72akMnD1TTQ6HI0vIbMyCOdz3MFNY8kMIIHvYFHkkAcVQ1vCul6pFA/GGVFFiysE0sx5LWAAOaTt9wARXpIBNqfz9Odi6w/J8UZeRPPk47RC7axxa1pDS4tJ9LQ38JO0mjVH1DfBjpN927hW9p1qEJ4dk1LGzJc3CxcjJbEd07NrnMsk15tcEXZo8GjfFrrPifN0XSNOZp7IZG5U8L3ZUcrnb9jmud637nFrpJHRmrI9NkjgqJ0nxhhxYLdI0rCaJcyRvmDBP9K5zui15fuFOAAJLhtsn5CnNL8F43iDQ/6ubOw48zIcYpcgQtkaZd7hTNu3kf8AHTgaO08OaV7GTLFprfLHjEfz/u3NWutxXtzzO8JO1LQNJl8PYk02W+OU5MYokBhjaXh1+obpOOOAfcDcuD+NsU4fiHIieKkoF7SKLXVyDz2F+k9Y8aYej6tN/sEW6COGaHHY6OMsic57X7xQBNSBzh8bWEVZC/OHj50z/FOW7JIMjwyQkG73sD//AGWP1D1PRj1I631+vyth8fLpXkRF4jqEREBERAREQEREBERAREQEREGRpNNLdo9quvcK9eAdRw4WAZpijc30tJjA3C/n35VDY7bfJA+vn2W1gytZODIAGOO0E/l/t3X+FaNT7odMb4gEWqGWIyMxjwzyZSHNjuwAT783f0PgFSePq14pY6pJnN2+a2R24A9hxc3n020ft8UaNiDc4NdIdx59XuOgfr/r9rT4c05+e+Rr5BAWt/CWk7jde3H/AH92PRrXBWnnefZju828a/KyaTqoxm+UzSsPO8xznthdvPq9IBIjIJFg7QTxuPHNnan1JkmDj74sgPib5I8yQlrHNLTtAu9tm67H3Ssmj+F/K07Cy2Oxo2TSOx2tc9okdQB5IF0eeT8D5ChfFWIzCwXQFuOwF4c1zQAHHgFwI7BB7Pf68K3H52O2WtZrOtx3v8/lbJx5iszuNorC09z8HO1zJezE0/Aj890rowWuIBDQG9Hc8VXVkhcHzJ3ZWXNO/h0jy6rurPStHjHxRPqGLHpGPlSSadA/dQcdjnc9D4Fu5+1UVn9S5c8jJqJ+2PZGDH4V/cREXnNhERAREQEREBERAREQEREBERAXprtt8A2K9+F5RBO6Tq8OKxoewgsPp4JBb3RN389V+3Yu+BrGlPjL489mHKAW7XvaQBX5T3XXwe1ytFeLzCNOt67400fHnhOL5kuTA3yjKyUzFwq7BcA3jr39gOlSfEnjDUdbEsTnugxZHNe6IOsuIBA3O4sep3HA55s8qtIptltboisQIiLNIiIgIiICIiAiIgIiICIiAiIgIiICIiAiIgIiICIiAiIgIiICIiAiIg//2Q==
Base64>e_7,DECODE,e_7
WriteLn>%TEMP_DIR%earth\earth_7.jpg,result,e_7
Let>e_8=/9j/4AAQSkZJRgABAQAAAQABAAD/2wBDAAYEBQYFBAYGBQYHBwYIChAKCgkJChQODwwQFxQYGBcUFhYaHSUfGhsjHBYWICwgIyYnKSopGR8tMC0oMCUoKSj/2wBDAQcHBwoIChMKChMoGhYaKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCj/wAARCABVALQDASIAAhEBAxEB/8QAHAABAAIDAQEBAAAAAAAAAAAAAAUGAgQHAwgB/8QANRAAAQQBAwMCAwYGAgMAAAAAAQACAxEEBRIhBjFBEyJRYXEUIzKBodEHFUJSgvAW4TOxwf/EABkBAQADAQEAAAAAAAAAAAAAAAABAwQCBf/EACMRAQACAgICAQUBAAAAAAAAAAABAgMRBCESMTITIkFh8HH/2gAMAwEAAhEDEQA/APltERECIiAiLKNjpH7WVfJ5NduUGKKQjw2CN5cTI5oohljnwASO/bjvz2sLynw5Gl7mgFlFw2/C6/8AXP0QaiIsg0lpdYof9fugxX7RoGjR4tbccL2TgRRSue2wPYW88075VbT/ALZmdP0uWUfelzKdyY+w+n1oUPiBVeArSK/HpKPJifJCAWtppt1P3N4Aq+xHw/ZQGpdNywCR+JJ6zWGthFOP08O+g5TWxAIiICIiAiIgIiICIiAiIgIiICkdNijMT5HjkE2b/o4Dv0d+1d1HLawcgwuoOay3B25wJAoHjjnm0Eid7n7Ym7JthbZFONNruL80eT8OPJyDGkPsMY4tHYEOZxx2s3yKB8tAHxWIDBE7c+QxN2kPJstcbugO5ouN/Qi6BXm/IYxj/vGtkLSac0uBLqJA8d/qKr5oNDOY1mTJsFM3Vx2B8gceCsHWd5dGGigeOK44r4+D8eF7v222PI/8pdTiC08WBRvseCb+fzW7o+N9oy5KD3sIst5fuNX34555+RPHdBKdP6OZn2x0ghBc4bm2Lqr+ot1j9rVo0rSHxB07xvIcC2Ora6j9Rz3HxF39JTorSn5mxuOfSjosO2WgCbNCrsccV8/KvTMMaTDJFkab9qYACZRubtuu1817jdf281wuJmY7hZWsT7Q2jYksEc8kQ25D4ywPiA3817doHI78/Kh89DXMWHRJBiz6dHkta1rsmSU7SHUDtjI8UQf8vzUrN6k8UYgD27iTE40HF3ydXbt+va1JaXg4/V0uqaZlT+jqYfvgc5oPqyhm3ZxVA7A4HuOe90dXArOSZvb4x7ccjVPtj24T1XosIil1HAIDQ8GSEn3NaezqP5XV9/Cqa7l1F01ijp7T34z3TZjyY8uFoJDQ5jHxmu9lr3DwPYaHcniWVEYMmSI/0OIv4haObxq4p8qepUYrzbqXkiIsC4REQEREBERAREQEREBERBkHva2mucBzwD8RR/RZxue+ZpNPcOaeeD5N3+a8l+tNEEVY55FoNr1Y3S7r9o91u/EflXYn4muQLq+DMdOQSS5YjxhE0ECxJXPtuz3q7FeBz5UNE31HvfFH6jm0febJ55cRf+3+at3R+Tjt+5e17JSwBsgoNbdH3dvqT+fHZTrY6hpGkwaNity8uZxmBDy/cY2CzyD23Dv5H5q5jLjzNO3tyJ8trXhn2KLJYzh3vNvY87gWgHiyS4DuTVEyc/Rp9LGKzPiblSjbE0N9UlpB9pIDtps1YFk89iVO9A6T1PpeRBLgw40Y3ehHFkRtLg57gBIy2k01+3c7xY45VkYd13PUnn302cjG1iLAZnfy1v2bUN7BLbGRtBcAbcXfdtDg2t20eBVlQ/TWi63n6j9r0yGON0LPWkyXyM2RsIpzyXOrs7dR5o32IV46g0TJxP5fl67nxZ2PgS++CwHFznN9X0muI3ODrPuAbQs7uQtSPq2PT8JmnaRE9mQ17YZXSxbI2gAtcXPi2v4IdRO4053HAJ9TgTOHH44oiZn3/bZ8+r23Y6t1iR2pYWNiCeXGxBjwT5AY58Dw0/eB1iyAPTb4ungg7rHzh/E/T4dO6tmbjbPSnhiyQGXTN7A4s5J/De3/ABX047XdBxunY9SyXtyOpQZ34eYYWlxLZJXMlcz2inG/7tthfKnW2Y7N6ly5XjbRDQ0EkNAAposk0Ow58Ljm11iiNa1Ov9kxzuyCREXktAiIgIiICIiAiIgIiICIiAiIg9Gk00t2jxV15ClNKmkji+7aw7hTgWA7jdCr+n68qJY7bfJA+Xx8LawZWsnBkADHHaCf6f8A53r9lZS0RO5RMO6/wlj0bKmeNTg05s8ZtjnzEbhxZIJ+QO4Ch4pW7r3q3AwcyGLp/Mc+yDOyF4Ee4Ai/a73DaewoHjmxxwTFbuLQZC5x5N2L/wB4U5A6SV7DI5wBLW2ea47fqt+LFS9t2npTa0xGodC/5Y/IkkfHNCyNzRujy3zSue9oHvFAhvHtAbtG1oB7Aryw9S1CfNgm0yT08obmyOj3NDjRuV7qFONv2kAEHtRAJg9D04ZWf6U8higb7nOA5cOOAT248+K7Hsup6diaPouh4LJcmL7UA6SSFlOeIaa4PeKNFwPBsCncduLM2XDxusceVv72UpfJ8p1Dm3UmrZEUUh1J8MbWhxJjYWU1rq3UKF+2h8R35orhOXMcjKmmLQ0yPLyB4s2rp/FLqmPW9UdiYDmuwcdxAez8Mjvi0eG8CvjQKoyxcjk/WrWsV1Efj9u64/GZnexERZVgiIgIiICIiAiIgIiICIiAiIgLJrtt8A2K88LFEE5o+pxY7BHM97AH+0nkNb8yPhz4/wCrnp+s6bDIyQZGLIzbtkilk/EOBQPBHckUQuYIrK5LV9ImIl2LUOtencR8M2McjIkDqdi7Q5rG2LaXAt3Dg9ndiPmqB1X1bmdQ5Lnuihw4C1rfRxxtbQAAB+I/02eVXES2W1o0iKwIiKt0IiICIiAiIgIiICIiAiIgIiICIiAiIgIiICIiAiIgIiICIiAiIgIiIP/Z
Base64>e_8,DECODE,e_8
WriteLn>%TEMP_DIR%earth\earth_8.jpg,result,e_8
Let>e_9=/9j/4AAQSkZJRgABAQAAAQABAAD/2wBDAAYEBQYFBAYGBQYHBwYIChAKCgkJChQODwwQFxQYGBcUFhYaHSUfGhsjHBYWICwgIyYnKSopGR8tMC0oMCUoKSj/2wBDAQcHBwoIChMKChMoGhYaKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCj/wAARCABVALQDASIAAhEBAxEB/8QAHAABAAIDAQEBAAAAAAAAAAAAAAYHBAUIAgMB/8QANRAAAQQBAwIEAwUIAwAAAAAAAQACAxEEBRIhBjETQVFhInGBBzJCofAUFSNSkbHB0TND8f/EABkBAQADAQEAAAAAAAAAAAAAAAABAwQCBf/EACQRAQACAgICAQQDAAAAAAAAAAABAgMREiEEMRMiMkFRYeHx/9oADAMBAAIRAxEAPwDltERECIiAiIgIiICLLw4Gua6WSwADttpIujyaB44/v6EL6zZIDQMcgho4cRzwQeB9ByfIV5chr1+0aBo0eLWZHE9kpZFHK51FtbC2/Qnniraf1a2mJpssrv4zgyrLi0+QFfnTa9CBVXwEeRTwdL485cXEsb2aXH+WwAfOqA5Hv7FabXelcrTXnZcjNu8AtIJHtx+vK01sRxERAREQEREBERAREQEREBERAREQEREGTNKP2aONjPgrlx83dzX0Nf7oFfM255Bi5dVBoquOAPy9yvs6EmJzXljZIwb7ccgV7dib9x6rM0rCknllJaJg0t3i9wJPnfmQTXn3rtynRps9C01sjGPY9/hEnaSLa59AAiuxonj+9WpvpfTr8nEkljk8OVnxNL/i4B/Dx6D/AMWJoOG2OAY52bjZdISKN832r+nf6q0ui9Im1fGjx8aaRjSdkjN5a2zw3dye9cUAqeUzPS6KxEdolpujPgaA5zWPeA23R2Kt3BIP8osDafc+m7m0Y5UM+W+aGB8GK8x2T8J5O5oINihzV9/dWFlaJl6PAcbH0bHzTGwb53scHc1yy6NDtf5cqGz480+THksx3FsMZlbH4jiGMLqJNckFxI572R58zW084i3pM1rwmaqB6x0qTHyZMh8T2TE3Juj2br/EW+R9fnfuYuuj8PSMbqrRRFFgsGZDBJDkuYXhsjCxzmuLd3Jb4YPFAkgm+y561TCl07UsnCyGlssEjo3A+xXpeZg+K3rU/mGPFblDFREWJaIiICIiAiIgIiICIiAiIgL1F/yNNXRuuP8AK8r9aaIIqxzyLQZ2PK0uLyRQa0ybhd/ELv5nbfHb1PeR9GwxDEzC8ljHObe8AWAODz8z6+Si8bTK9z4o/ELKJ38l3PJPP6B+qkWlsZl6Y5jYXPyAAI3mw1jdvNntfDufT6hRavKNOqzqdpbgZksefi4uEGZQG0W+y4n0Dr57A/O1fXSvRnhacNR1hkuNI+vCx2O8F1n1NG7sckDy581Uf2ft0LFYw6kZIs1r97ZPDMoJq2im3fJ7kA8q5dP1HScTTcz986phxiYF8jJHsbK0M5YfB/7bP4dtDkXwrrePE64x2iMs979NgzW9L1LSpnS6hE6RkZnZhMnYWykN2kvO4vJ3D8RujQs0VEtb0vUMbCy8jMkw9KjyM4YclRvqE7TJtbG1ptvDKq7LWHgcrB6f0DWZtRlzdBzoo4p5m5MOTtLIsh7Xjbbdtjl9C2ho8ybCm2v9PwnTmalrudJl6kH+P+zubTHEUfCIF1xwTdAHhvZXfDTHlrMz04i8zSYQXpzpPP03GztenJidixulgZKAL+B4kc4NeHDYfhoCi4getc9/aZhSYXV2WyZszHvAfUrNprs3izQIAI5PfuRyuhc3PztQ1AwNZhY0OOPHjcMr9mG8N8OJ4c6TkxuA2i7+HaaBK5/+1jWZNe6+1XOlEbdzwxrY/usa1oDWj5AAfRafNyWvSLWnczr+lWKsROoRFEReWvEREBERAREQEREBERAREQEREH0aTTS3aPKrrzCkPTWr5OnQyNgG4Stp3PN9hR+g7eyjjHbb5IHt6+SysGVrJwZAAxx2gn8P+O9f6XdZiJ7RKeaZqMjMoOlbJkudd7pCWu478U705BVj/ZV+4tU6phh17Hg2y8+JJluiY1wHHc2XF3luo32VVaaBbRuIIF2Ph/In0+Xf2Ujghkf99wIPJJbtPt2B/NepjtW1dR1/LPMTEukftJ6i0fQemm4GkPwHSgPYMaJ/wxsIIfYZdE7j3ruTaqGbq/KfhxsIkjcxsjBJGQHyBwotLiCS3txx25BIDmxdschcyI7nMZdA8j4j5H5UfX29N9oOn4h1OQZxAg27owXbaPFuI9B97jjgdxwr6YsGDHyyRy1v/Ecr3tqvTE1JuRFoz9V1CVzIoGFzXOk/iGyHGuDQNuIPmXA9lRGRK6eeSaQgvkcXur1JsqxftY66xtdjxtE0ONjNHw6qUM2vncB51+EEmh8uTQJrZeRm8i+afq6jfUfppilafaIiKhIiIgIiICIiAiIgIiICIiAiIgL0122+AbFefC8og3mkapHAyOJ5LSH/AAkngD3Pr+vlMtM1PTns3vzsWE8AtfJX9O/CrFFZXLavpE1iVus630fQ9WbNj3nQ7g2SDYHtcwg3zw2webHqO3KhnVPWufrcsrMYO0/CkaGGCKVzi5g7Nc4/eHPagO3HAUVRTbNe3UyiKxAiIqnQiIgIiICIiAiIgIiICIiAiIgIiICIiAiIgIiICIiAiIgIiICIiAiIg//Z
Base64>e_9,DECODE,e_9
WriteLn>%TEMP_DIR%earth\earth_9.jpg,result,e_9
Let>e_10=/9j/4AAQSkZJRgABAQAAAQABAAD/2wBDAAYEBQYFBAYGBQYHBwYIChAKCgkJChQODwwQFxQYGBcUFhYaHSUfGhsjHBYWICwgIyYnKSopGR8tMC0oMCUoKSj/2wBDAQcHBwoIChMKChMoGhYaKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCj/wAARCABVALQDASIAAhEBAxEB/8QAHAABAAEFAQEAAAAAAAAAAAAAAAYCBAUHCAMB/8QANBAAAQQBAwIFAgMHBQAAAAAAAQACAxEEBRIhBjETIkFRYXGBByMyFJGhseHw8TNCUsHR/8QAGQEBAAMBAQAAAAAAAAAAAAAAAAIDBAEF/8QAJBEBAAIBAwQCAwEAAAAAAAAAAAECAwQRIRIxQVET8CNhseH/2gAMAwEAAhEDEQA/AOW0REcEREBERAREQERVBpLSbH09SgpX2jQNGjxauIRcwjxyXOdbOWkAizyefTg/b45yuPp0sjvzLa3bTqcOA2gPgXQ9+3ygwKKeRaHEJBK18kTWE2PbaQGh3PIofSr97Vh1F0zLDjtycOEua0Br9jSL8reSPQkk9uDYoA8EIkiIgIiICIiAiIgIiICIiAiIgIiICIiD6AQ2y3g8An3/AL/mvR+57z+UA5xFBrar2AHyvYwEROa4tD47LuQa5Ar47E/ce6usDByZZXOjaJwPPJtksff37kHv3PbugyvT+nxkxvGR5OXXtsdwB60OO4PFjnsp5p+jRStMuPNJDuGxsjvNbfSuK/4j1/mvHprQ424T810DGyPID42s5Bd2u77XyaPHvZU203Cfj4sOJOPEMEZaH7C0hlX+nmjTQe/seyy5M8RE9MtWLBMzHUsYekRPhtyonyOEe0SsbGWt5AF20AAc9u/t7q5b0/IHyR5e4AbWFxIDQ4bgOwA4oH7We6nvSmnY+rNOLk5Lm7Q3e0yFrLv9RBdTu4HCkPWek6jh6ZI2HLxTgQNZu8eNtvdXPazfN1VVz3FlM5JrwlEY4ty5I/EHp2LHnk1HSWOOK43NGIyDCSed3cN54q7quObMHXRvU2A7TscumLvAyXyYU8RaeBtbv3MIrdf6T3tnIFBc96njDD1HJx2uc9kUha1zm7S5t8GvSxRW+1Px1yR2n+wxTO1pr6WyIiqdEREBERAREQEREBERAREQFVF/qNNXRuuP+1SvrTRBFWOeRaC8hkDyTTnWy5KB5A5NkdrpvNev1uX9H4zGabICCfEeSQ8Agi6H8B7+v0UMhLpHudHEJHgAuDvNfIJJ+9fY/dSrprIkPhtjc5w2ANaRQBH8zx/gqGSs2qnjmIs2r+HUM02HNp+WbBDoHtl3WRQ4JsHkO73fmV5rOdkaDlYkOn5zM6Usc10b2cxA0R2IqwWgXZ4PPYLEdPMxocaaafNzYd0f5oxHtY55HZvINE8gHjg+yy/4Z6Zo7M7Ik6yblwM2b2P2vc11nuS0E1yOe3p68NJpqZbWyWniPG3n76W58tsdYpEc+/0210D01LqGNBq+rR7A5jg2FvDpL7PDmuFdyAD7D4WSGu6Zm5uVg45ZPq2NFWJHGx4Ao7WuB4FbnAWDxVmqVzj9SaPhYQkGosxdOZGRivyo/DDtgpwZHTXPAsdubBA9VEsjQ8Lr/VsjPwMrJOmsk8OYzCpXULaIi4kbTYIDg3lxJDqAbrxaWld94mKs981rbc8o51Z0uGahiaU4T5OoTmZ0ojJd4YHhlsgABc87XPFckXf+3nnn8YGYrfxC1V2A1rIHvtsTP0xV5dgNCwA0D2+vddO9VZWnYWgRw6fM+fPkZvfqMjtsc24+dkbtws2WeQhwDCbBLjfJ3XGUzK6jndC9742tY0F/e9oLgeTfmLufXvQ7Cd5j4K1jx/qHM3mZ8sAiIsiYiIgIiICIiAiIgIiICIiAiIg9Gk00t2j0q69QpD0wXykRXbQ0v55JPYV9mj9yjjHbb5IHx7+iyGkTujyg4u2sB7k0G9zfsOT/ABUt42cbZ6Q6qj0fWbmwosjFa3aGcHy33HHe79QP4LKZHV2TqOXJIYGMbJN4zGQwxMLfMTx5D/Xi7UN0yeCbNlnLtr3NOwPFG6oHny8eXv8A+3mdPx/E8j28gHkGiQOf30P8d16Om+P12hTk6kq0bX8fG1rCyMzS8EwwvFtk8Q7Tva4vJ33YAHHLe/C3N1T1105pvS0kOjzQTiSLw4osSmNj3Djns0ix5f1DvVA1oZ+K6RjPGmtjb8pDSSDwaPcdv63S8W4Zd4j6H7OyRrXVw1tgmjd1dH44+FtvixZZra/GyqLWrvEKM3V8iSCSTOm3wwNdLLIY2ucOdxpxH6i4Gj6lx9ytH5MzsjIkmkrfI4uNfKmHW/VDcyF+k6XTcISl80rSPz3A8Cx3YPQG+eVC15WszxlvtWNqx93aMdOmOe4iIsiwREQEREBERAREQEREBERAREQFVG8xu3N/V6GyCPkUqUQZ/R9WjgY2J1Mp3l3XVfX3/cFLtO1vC2sa7KgjFC7lAHc/P98LWSKyuW1eyM1iW4Zus9CwSJJJ5MyUUHQQMJB49X7gK+hPf6qCa51nqep4k2HFI7EwZy0ywxPP5u263n1AJca4HPwKjKLts17cTJFYgREVSQiIgIiICIiAiIgIiICIiAiIgIiICIiAiIgIiICIiAiIgIiICIiAiIg//9k=
Base64>e_10,DECODE,e_10
WriteLn>%TEMP_DIR%earth\earth_10.jpg,result,e_10
Let>e_11=/9j/4AAQSkZJRgABAQAAAQABAAD/2wBDAAYEBQYFBAYGBQYHBwYIChAKCgkJChQODwwQFxQYGBcUFhYaHSUfGhsjHBYWICwgIyYnKSopGR8tMC0oMCUoKSj/2wBDAQcHBwoIChMKChMoGhYaKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCj/wAARCABVALQDASIAAhEBAxEB/8QAHAABAAICAwEAAAAAAAAAAAAAAAYHBAUBAggD/8QAMhAAAQMDAwIEAwcFAAAAAAAAAQACEQMEIQUSMQZBEyJRYQcUgSMycZGhwfAVM1Kx0f/EABoBAQADAQEBAAAAAAAAAAAAAAACAwQBBQb/xAAlEQEAAgIBAwMFAQAAAAAAAAAAAQIDESEEEjEiQVETIzJhcZH/2gAMAwEAAhEDEQA/APLaIiOCIiAiIgIiICIudpiRnlBwuYMAwYOJX3oyagZbbnPcC2NsbucnPbB+ntna2+l3NxUa1pLCWhpyOAQBOcTA79vdBokUzZoNvXps8cbHhrjGQRtgAH0ER9M4nGNV6Sqsrh7DNqTHmd5mz7jBIwT+6CKorf0X4e0r5lNtCgyq5xBLnQBMcZOBAmZ7H3Wl67+HtXRbJ97aFzm0ifGZsIaPVzfYExz2QV0iIgIiICIiAiIgIiICIiAiIgIiIOQCGyW4OAT6/wA/2vo/c95+yAc4iA1sR6AD3X0+XcGPD3tDmAyMGPNEfoT+Xqsi1sritXinNbmpU8N26W4njk+aIGc/VOBttH0umWh3ihxAJaS6WHIjiYOOPUfgrC0XT6NS0HiVKh8SG0pA2zI2ic8xgAT+8Z0rTbui0UrnSaz6joJc1h2moASZIwff8Fb1j0ZUo6NZUbY1G1azmvoVuS14kbWjcCZhw9RjuYNGXNXHMRM62ux4ptG/hgWHTNtVqinWc6s1vkkO+4Ae04kREZ7rIu+hDRuKdraBwIG5rcEljsglrZggRMiR7qZU7Su+7Nbw6leo1lOuQyk5+/fBh3cYmTkGPxJlnS1npV5Rq1hcMokfZs+0HiBxBG50RjjbmMcSs+DNObepX5aVp7K76NvLbT9UOh6xbubbVRFIuMBjzyNziI47mIn/ACxt/iDpdo/QbirdMi38CpLdkAOLDukmYaZwOcGewWn696cZZVbmtS1J1RtP7Sjdbg4Ne0OqFoAM9gZAIBwVV/xX+JQ1PSxo2nse2rVYPm6ztwwfMWCefMTniDjBhu6kT2bn+MuSY7uPCnERF1AREQEREBERAREQEREBERAXal/caYmDMY/ddVy0wQREjORKDNpVRU5BcNk1IaZIBJMkepDcx39szDoy022Z2M3OqO7tGYOOOfXnE91BxUBJIaC8wJf5pMyTJ/kKa9MXlP5e3a0PNQN2/eIB9O0GIjnn8lDJWbRqE6Wis7XH8nt6eNGlUdTeykSxzCAWuguB5HrnIn6gKadF1KnVnTz7TWGvd4JY07/LUa5hcWAlrQWkFoye+IIcqt0DV7mvauoUmPFQgNYHQNg7Zme//IxExsadG30/UKlTU7m3mgSaNgWU316hMAF8EySGzA4kkwvIvg7vtzOrbjU+dc/rnlv7uJtEce7I6s1CrpeoWGl6Xd070ikx9R1alse0OaMb2kSHNcTECA7vKtqxsP6fpNe+uWPuNUrUt5FDzuBiB4fcYcJg9/SFUHw0ttB0yrVf1NZvq3gqBtJocypTjudodJPsQceshWfqnX2lafbEEvurirTm2sWNG6o0+UbjENktOD2PB4H0V+hrWaxSO60R51rf+PMjPaYmZnUfCK3Os2Gv+JbdQWpdUtN1IWm13iV3ONNjmRTEAbnbWumf7Z5Dp8mfEWnt6quXuc59Sq1lSo5zS0lxGSQeCvYVtpFj0/b2Ws6haijd1ahLbVzg1tCQ4Bpxlo8nDXGQwgQM+QPidqT9W631O6qsex7qnmDwA7cckuAAAMkyBwu5orWJivjaNdzqZRZERZkxERAREQEREBERAREQEREBERB9Gkw0t2jtEx3CkXSpe57QIMDcJElxGAB+ED6dwo00jM8Qtz01eNtr8eMHeAXbpkBrT6nH4CMcrszxJEcwtfRmOFQO2tDbcAzmGjjEHHJ/RS3pHry30DWbluoaXQu6bQWNO3zgTMjd3MT9BChVndssX/M1A/wKZHibJlzSeP0H1WXY1KVwL64tq9OrcVvI0OgOawtAJgnsNwxJx3BVnR462mb2jfslntMR2xKQ6p1bdatetuKnjnfVc6lTpv2NaTw0GJ4DWjPb2W66Q6y/onVbLrV6dvb2NZxFVlK1YCzDtpZAkAbzPcgmZKidvZCpSp1LiiADEv3TBJ/yz3nP8Pe8pNLiG1az7g+UDdvAJ9i3ntGI/Ne/H0prNJjiYef6t723Xxm68o69UabVtSlp1m0ncXElz4mS2doPYYnnPYeY69V9evUq1DL3uLifcqWde9QNvbh2n2VVtW2pO+0rMPlqvGMRy3GD+WIUPXjdVlrbWPH+NWrHWY9VvMiIiyLBERAREQEREBERAREQEREBERAXam8sJI57GSI911RBKdA123p27bPUGl9uHQxrnGAMD72Y98KTaVrGnUqc061tS8wgurgOA9ORjvx2+irBFZXLasahGaxK3LjrPRreBXr1ar2kAi1YHyI9SQPyJ/5COp+r7zW2+BTYLSxBkUWEFzsD77wAXD24/wBqNIu2zXtxMkViBERVJCIiAiIgIiICIiAiIgIiICIiAiIgIiICIiAiIgIiICIiAiIgIiICIiD/2Q==
Base64>e_11,DECODE,e_11
WriteLn>%TEMP_DIR%earth\earth_11.jpg,result,e_11
Let>e_12=/9j/4AAQSkZJRgABAQAAAQABAAD/2wBDAAYEBQYFBAYGBQYHBwYIChAKCgkJChQODwwQFxQYGBcUFhYaHSUfGhsjHBYWICwgIyYnKSopGR8tMC0oMCUoKSj/2wBDAQcHBwoIChMKChMoGhYaKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCj/wAARCABVALQDASIAAhEBAxEB/8QAHAABAAICAwEAAAAAAAAAAAAAAAUGBwgBAgQD/8QANhAAAQMDBAECAgcIAwEAAAAAAQACEQMEIQUGEjFBE1EiYQcUMnGBkaEVFiNCscHR8DNScvH/xAAaAQEAAgMBAAAAAAAAAAAAAAAAAgQBAwUG/8QAJREBAAIBBAEEAgMAAAAAAAAAAAECAwQRITESEyJBUQVhMqHh/9oADAMBAAIRAxEAPwDVtERGBERAREQEREBEXJa4GCDMT147QcLmDAMGDiV6KBPPhbAue8FkFvYk57wRg/h8sy9lo15Xc0sa4NGTJBniRAPtIjEnr7oCvorqNuNrMLqtIw1oPwSS3AgOPjEY778qGv8Ab1ak19S0d61NomDh0THXk/JGdpQaIuWMc9waxpc49ACSjDhFZdN2he3rJlrS4gUwM8pjMd+YzC41faV7YWrrqn/FoiXERDgzw75jB69igraIiAiIgIiICIiAiIgIiICIiDkAhsluDgE+/wDv9V9CH1ahApAOdBAaIgePwyF3NDi1zaj2B7QRBMwZ67+RP5e4Xr0ywuLy69Nhc4kkvc0lzT/6I8HkRIk56TeINkjtvThcF1RjnODJLebDwmfIznAPXjz4u2kWbrUAmo22a48C9z4c53t48mMx81HV9JvrGgy5qipcUg0F1YgcZxEgEmMfLuJPStGm6TcOfT07U9C1IXLqhp0S6m7Eni49ZgtzAxB6UPKJjyrzH6bIpMT4zxKyWWhWlzUfQYXuq+i6s4g54B2S1sghs4yPBIiCpL907Ktbci36rWoNDBzqwXtAywMgy7OIVuqbQp2VbSTbXDqb2fF69JuKjeDuVKeQmcQMzGR7++pb3FrdueaFR9am5tN1OoS01GyCGET18OPH6RzY1nnMWrbiV2MEeM8NaPpZ2S7RzT1W19M0q8mpTY4S3JHIjx1n/wCqrbIsGXupRVDuIjokSPInryMLcHfuiaVubaNwLCxJr0mGiw12R8IlzyAMn7Rk+OUwtRts3B0PcdW0unmkGvc0OcIM9D88drpY/wCPe6lkj3dbNjtraALejb1GUm+tR5AllEgCGknHtAnMtnjgEhTus6BT9GraelzblnEEEimAw8sjJMk+wmOzA6bYv6dTTaVei9znep6biT8TgXfESOhPxe3UwDkSO8dy0rDatfUKt5bMt6Ze+q5rmnl0A3smSXOHkzEGZBmg023vpbdF3ZqdgwQylVloxgOAcBjHRUGpHcWpv1nW7zUKgDXV6hdERA6H6AKORgREQEREBERAREQEREBdqX/I0xMGYx/ddVy0wQREjORKD1sc2tkhziGcnkAz5kyPfGY856zddj2TGN9Rroe+G8m44gE/F/fuMYMKh+pLpH2zE8odJ7JJPz/T9bVtK7dbyyhUYWvIBpkwOgcyYnHf+ABDLW1q7VTxzFbbyzxtLT307egXUn1Xl7Q2HCYJAzkdf9RPY7nOXrzTal3tRtuy5dRuXtB+sNyWTkkQDyMGCPOfczg7bm6bUWVB9S7uKdeufTqNowBB/EEA9/zdfirboe7qt5R9Li70g0htMs48e8+A37R6x74ELgZ9Hm4tO3e7pVyVye2q+bLuH7k2zXttRNT1Q51tcS3i5jwAZEHsSC10A9HtUfU7hjd6afpegarXrWVPhzcONdxeZkcgJJAIPZzPRCm9OtaVR9X67caiH1g01qVlV4G648vgOJPIuLftNwcnAUdsilcbKbVfqujUql1X5NbWD3HiB9pshjh2ROfvyCu1+J0mKfUyRz9V+N577+lDVXvjtFev2uW/K1XQ9s2tawe1psarG1PQlr3yByDQJgkEu+I+ATPnTP6YqFelv29qXNm+xfcU6VZts/ukwsHFvQ6aB4W4VerqW6tRoWdjpostHpVKdS9ua1Dj9ZBDHGm0OglpDYJgzDcR3p59MWq/tj6RdXuQ1jWCoKbGsbxa0ADAHiOv1V/JjjHSI+VeLTaUVpO79b0un6drfP8ASiOLs/dnsxK8eta9qmt1TU1W+rXJJBhxhsjAPEYmDHSjEWhIREQEREBERAREQEREBERAREQfRpMNLeI8RMeQpDTSXsDWEl/Zz+A/QKMBiZ8r12VX0nveGwfDvYSP8/dn7lsx28Z3RmGT9muNX0ntFN7mGQHZxBz98CPwKyVpNM3FSoRSBcwFzgIHEcp+85P9B0Fjj6NL2nVu2WdUGnS5F7XcJJceII9uwCDgDPcgLJlS/wD2M1mpNeRQaYcQCG1RiGwe5EmMDvrxR1ETOf04hdwbRim/ylLLfdXQNwOabSlc27GyeDSHAuaJOZkiYGRgkKvazui+1nWDdVHfV3muXUudUuFE5wOWJwPEyBELqx9tejVL6wuLaa7PSioziaTIDSACOzJ6PWfED5MDaVNoruDn4DeDZM9efkAIjwvTaWmPBWI8eYiI/py81rZJ337ecb31DbWka/SFVtQagz+NX5l7mO+Lk4EkgucHGcTkZkBa63FV9evUrVDL3uLifmVbfpB3FS1S6FnYBos6DjL2AAPd8o7H+9QqcqGuz1zX9sf62YqTWORERUm0REQEREBERAREQEREBERAREQF2pvLCSO/BkiPmuqIJ7Q9UpWwDXuLHAngSJHyJPuPfCyH+9Wnalp9GnqFWlVrsJDHOugxzcR5kH8xKw8inXJNeYYmN2YLjfWl6dastgKVd7TwcbdpcQCZOSePykHz+VF3PvC91un6DWNtLOQTSY4kvMfzO8juBAHUyRKrKKV8179yxFYgREWpIREQEREBERAREQEREBERAREQEREBERAREQEREBERAREQEREBERAREQf/2Q==
Base64>e_12,DECODE,e_12
WriteLn>%TEMP_DIR%earth\earth_12.jpg,result,e_12
Last edited by JRL on Thu Aug 30, 2007 10:03 pm, edited 3 times in total.
Top
User avatar
JRL
Automation Wizard
Posts: 3532
Joined: Mon Jan 10, 2005 6:22 pm
Location: Iowa

Post by JRL » Thu Aug 30, 2007 9:57 pm

Part 2:

Code: Select all

Let>e_13=/9j/4AAQSkZJRgABAQAAAQABAAD/2wBDAAYEBQYFBAYGBQYHBwYIChAKCgkJChQODwwQFxQYGBcUFhYaHSUfGhsjHBYWICwgIyYnKSopGR8tMC0oMCUoKSj/2wBDAQcHBwoIChMKChMoGhYaKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCj/wAARCABVALQDASIAAhEBAxEB/8QAHAABAAICAwEAAAAAAAAAAAAAAAUHBggBAgQD/8QAMRAAAQQBAwMCBQMEAwEAAAAAAQACAxEEBRIhBjFBIlEHExQyYXGBoSORwfAVM7HR/8QAGgEBAAMBAQEAAAAAAAAAAAAAAAECBAMFBv/EACYRAQABAwQBAwUBAAAAAAAAAAABAgMRBBIhMRNBUfAFInGBsfH/2gAMAwEAAhEDEQA/ANW0REQIiICIiAiIgIi5IINEEHvyg4XNGgaNHi194n7XFsFkuaWnc2rFk2eeKoH9vxzL4elZMzm7Xbe1tLgbo0L9r44s9h+KCARZqelnuhDsiPZRABkO00CBye1UB+3PlROq9NZOI+T5AfKG92bTv7128+/6IYQCIiAiIgIuWsc4EtaSB3of77FHAtJDgQRwQfCDhERAREQEREBERAREQEREHIBDbLeDwCff/f8A1fR26SSvlgPeRQAr9AP4X0fAG72ukaHNsAE89+3f8E+f5C5ga8y8uNl53erh/vyO/f8AlTEZ4ge/S8Zr52SAF0e4mOwQA4mux/Qc3396WeaLo8skRk+RLNEHD1MaQLHez4HP8A+V5egNMzcySMY0TXhtBhe6h344qu4Pt+o7rK9d6f1vQcjDGTjSZkcsbdr2NdTHuk+09zuPAriyfcc1307/AB5jd7LxRVt344SmhY0b5IhmTfUg2TjxS3tvkNceSPJr8HvdKeh6ax5MBuRBFDNG2R8EtyA7ZGFwLC22mxbjQHYghdOlOntRdrUMOpdL5mM4zBrs2aB22NrTwRxRHDRYP55tWZndOwaflvkhbNFNksETXA+ibb6gHcVutxAFt4aeDQXnarUTRVFuO8Z9J/k/MNVmiicTnLWH4tdCP0tr9Z07Glbhuf8A1bIqnAbX+/PIPHsfKqxbs5Onz6jHqGjFkeTDqEJa6BzHVH6ZC6vAJIcB4s0CLN6aa7p50rWs7ALt/wBNM+IPojcAaBo8ixzytli5FyjMM963NFWJeFS/TekP1bMEbRuFgbWglx5F8D8X7fv2UQrO+D0cc+XG3aXPEgaABZu7/YEf5Ne/ZyZz098M3jT3v+VFI7dw0kVXJoV/87i+3b4dbfC+ObR5J8OFwymEljmxBhLeK4Hfv47e6vbpSDEa0xxPfJK1zC4OaBtadwojz5dwRwCbJbS9Oo42mZuHIHgfK+aWzQx7S5rWt7FtN2eoEV3NnmuxLQKWN0Uj45Glr2EtcD4IXVSnVDmv6k1QsDQ36mQDaQRw4i7HdRaIEREBERAREQEREBdov+xpq6N1x/ldVy00QRVjnkWg9QeyTl9mm24gG/N8jyeBdeefzMdKYDMrU2RytaG16muJ2kjkEntXY/nxwoAuDnBw++x93O4+Sb/3/OR9P50eK2MCJr2bqIYKdyB3cfP8f+KYiZ6OI7bDdD6ZtDDuIc5o9LKBA5NkkEeAeeBxfbmxumG5B0aPNjlmyCNrI/kFrGna+q3UCQNtWSbb2sk3QPR3UWbBKGRlmXG62sjJ3OPBdVAX2J/HH4Vx9PfELTZNIbPl5n0eWyVzXYuMwuaGcG2gkCyeDzxyeLs/P6nQX66uv29ONRb28SsrPwmaloUuJPNJE2Vm0yxO2uaO9g+Oyh9Dyocjp/Kx+pvprxHbcv6pwMZunNcd3ZpsEX2qjRBAgcHqmTIypQ05Bx4JHNZ8xhBcOK9RHbmx5916W4TsyJ1YQyc9rXvhI2ysY/1BjzbgxwaXvrdurkqmnsTExZu+8Yx38/1Su39k1xLHfhqxs3Ueuaxpukuh09xMeOI4jtHLQGloPJ2Eki9oPtwtYvjNpR0f4iarjCVsse+43Ag+gekA15G2iO4IIPIK2VyNUy+isWfRsDVoZGQNkkO1zA8ONtAc0BxBDqO0OsgG9vNa3/G7HGF8R9Rwm5MuV9PHA180rre+R0THyF3m9732DyDwvr9VRFPMdT1+IeVbmZ4ntgim+k9el0DU25DDIYjw9jHVfb9vHlQiLE6trelfi5on0MjTmYcLXciLI9NuAFl32+mmkVzYJA+6hhfxN+M8WfhjF6efM7JLHRnIP2xBziXBpPLj7G6Arkm1QyICIiAiIgIiICIiAiIgIiIPo0mmlu0eKuvIUhp39Roawlz6s2f2/wAKMBq78r2YcvynueOe1O59IJF+PF/p3/C6269s5VmMsswGS/Ja+FxcBR4NHz29u5Vj9CxjJhaGYzJpoCC4EWHgkmq/Y8fz4VYYEkkADgQA7mj+Tx2Vv/CHIxZsp2A9kcW652SU0Pc4UDGbPIHDh2AG88+NOuuZ0tU9zHKNNTHmjPSxMX6jMfJCI44iWCV2wgOIYeHfb3ABNfwLKj8rq3XNI12SPS2QSxQwFxbsG2trS5x5FfaP7D359XUOrRdONh1Gi57JAIdri351d/cAEcHjzzZ4OLalqGFmwZWZjTzY31MofIySEAhjAAwEh1OA27rA5Nnjzh+j2prjz1xmOuevmGvX3IpnxU8MZ6o1Oc4edlarJOBuMg2t9AJNn08AfsB9wVDZuVNnZk+VlyOlyJnmSR7zZc4mySSsx+IvVTdXm/4/AJOFE+3SE2ZXDi7vt+nf9gsIW3W6jy1RTT1DFao2xmfUREWJ1EREBERAREQEREBERAREQEREBdo3lhJHfwbIr8rqiDINJ1HGEQil3MeOGlzraRxV35Av+Flmi61hwuG3KiY4usOM4YYz7tNj+f7qs0XSi7VRxCs0xK9OqfiPo2U3HkyzFmZcfcwufI4bvVxuAaPYjc6uwqlWPU/Wepa8PlvLMXG2hpigAZvAAHqoAH+362sZRTN6uY254NsZyIiLksIiICIiAiIgIiICIiAiIgIiICIiAiIgIiICIiAiIgIiICIiAiIgIiIP/9k=
Base64>e_13,DECODE,e_13
WriteLn>%TEMP_DIR%earth\earth_13.jpg,result,e_13
Let>e_14=/9j/4AAQSkZJRgABAQAAAQABAAD/2wBDAAYEBQYFBAYGBQYHBwYIChAKCgkJChQODwwQFxQYGBcUFhYaHSUfGhsjHBYWICwgIyYnKSopGR8tMC0oMCUoKSj/2wBDAQcHBwoIChMKChMoGhYaKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCj/wAARCABVALQDASIAAhEBAxEB/8QAHAABAAICAwEAAAAAAAAAAAAAAAYIBQcCAwQB/8QANhAAAQQBAwMCAwYEBwEAAAAAAQACAxEEBRIhBjFBE1EHImEUMnGBkfAIFULRIyShscHh8TP/xAAaAQEAAwEBAQAAAAAAAAAAAAAAAQMEAgUG/8QAKBEBAAICAQMCBQUAAAAAAAAAAAECAxEEEiExBRMiMmHh8EFxkaHR/9oADAMBAAIRAxEAPwCraIiIEREBERAREQERfSCDRBB78oPi+0aBo0eLXoxyQ50eOHPfINottGru+/0H+vtayuJpss0zPTcAC6gxzw4naeAT2HYcX3HbsAGBRTfD6PkzY2uFbQ6iS+3ChVH6cflzXssTqvS2ZhkmFjpQBZY0Eu/SrPv27II8iIgIiICIiAiIgIiICIiAiIgIiICIiD7RoGjR4tdjt0klemA95FACvwA/0XN8PpsqWRgfyA0GyCHAUa7eSmO100nzEkbtz7J5/fP6qYjc6gZXSYWUXg7mPdTAQQG8/X3pvP0Uk0yJryKHzFwouAojgEfXv7eR7rBYm50okfbn2KJ+nv2W4fh9peq61h3hsPqyNMRfLK6hGaG40CQOBwCDx7GlblrXj4/cvOoRTeS3TV06fpLhjxyv2wPypGXLI7aQ2gaa3g1yTxxz398tgnTM+ARRNYY8clr5msLnsa5x/wAVxvgC2iz5u6AXfrPRnVOl6xGyPEk1Bs7mQjLiLQ129jQG7QbYA5xpziB2oN7Gf9F6JrWHqMWP1No2n4emBpbCQ+O3Skiqa1xBJAJqv9lgz56Rh92totX6TG/4X441bVu0/srx8Vugn6b6+q4TAGNIM8bfIP8AW0ceTyB2u/qdVq53xC0nCwdGfi6hDI3EZG2COSOAiFzXNIA3N4HFtIPPnsQqhdSaXJofUGo6XNZfh5D4C4gjdtcQHC/BHI/FTxcs5KRMx9zPStbfDLHIiLQpF7cDTcjNcPRYS3uSOePP6UT+SaPifbdQigBq+fH7/wCrViugujYYsKJhhJkka0Mp3L3beGj+1/WuEGhpulNVjgdK2ESta0uIjNmh3/FYJwLSQ4EEcEHwrsTdL47ojDCML7TAwOcY3hhstJ37eTY5NHgDuT3VZvi/0/8AyjVoMgCMGcObII27Wh4/uCD2Hj8w1+iIgIiICIiAiIgLlF/9Gmro3XH/ACuK+tNEEVY55FoPUHslAL93DbeQDfm+frwLrz+vbgsADvcEXz5BvivyXjLg5wcPv2Pvc7j5Jv8Af/OX0sY52GSzG1zd4YaNH8fPfx/YW4vm7ubeEt6B0b+ba1BjPBLXhztrZAxxLWOf73R29x7eFbTobR36bpjhxFjCIsiZGG8A9iflrtVccc9+VVzpXW8DTZG/5bJL3cPkZNRc0G65B/8AeexAG1el+s8/FmdHB6E+PI8iNksh3AuNtaAOSewqr58cBYfW+LyOREdENHEyUpExM9268OOaSJ7oXOme2Xl17AADe0UOQBx5vsfK9Os4TNS0b7PI8RyOpzHkWWOBu+f/ACuCCLCh+g9c4r8LU3ao46fkQyBrIRReeaNbh8xB7gNNAXyeBzb1DkZeVO+OGeDFcxpjc77rA9ljgCySAeDxY5teDi4OfjxGTxP6/T801bjLbUMb19qk0vScWhGLfqc+RDBKdxLIxvaWSF9cBxDSL55cO7SqwfxAY32b4ray10/2h59Mvl3A7nCNrXdgObBvjvatjrOFgZXSeTJqUbXafhu9doBp76DmB1cAck/M6xbbIrhUu+IeazO6sy5IgAxoZGKN9mi/A834X0vExVrxYmtdd5/v7R4Yc24yzG9o2iIunLLdKyxQdQYUk5qMP5ddEceL/f5q3nRDsR2HG0w8FrWxRgB7pCacLaPvAA0eSfN2qWrYHSnxP1bRMeLFyLy8ZhobiC5reQe4N9/PBrlBdXBzsVuI1p+zPflkl7DIGb7bRscku+XkkAdzfvVn+KjUsOXq7F0/AYIzHH9pyGNaGj1H83Q7Ej5j77r8knx9Q/HDMysYRaNpkWI8WWyykSBm4AOLWVwTQ5JPZahy8mbLyZcjJkdLPK4ve9xsuJRLqRERAiIgIiICIiAiIg7ATQLaB7d68jle/TS6QbW8uAu93Pt/sFjQau/K9umF5yaiZb3mmn2/fAr6/grMd+mdomNpLhFwbGQ4mxdHgUDypNpbpWtHoEmgDQJB4N3791GIY3shAcH2fm4Fi/Y/kQs9AcjT3NjyGelLxTX9wO/H5L3cOfde0sdqalsHoNxzMp+PbS+O5/ULd3baOQTR52+OaW3Gtn1DIdFMQHsgL2NNBoraQB+VV+A9lAvgtNHk6rlYoF484ZM+Ww0tezcKAo0SJPvX/SaPtIuv+oItK1EwYsPr5zWvtu/b6ILdoMm0buRfy7va6sX83zqX5HqHtUidTqZ/163GvXFx+uZ7/nZAOutVyPT1PMl1GVuJLI9zo/U3AtYT/ST2s00eaPsFXHKnfk5M08lb5Xl7qFCybKm/xP6uj1zMGFprWx4EIa1xa4kSOaK4Nm23Z+pN88FQNbORl6orjjxVjrHebT5kREWZ2IiICIiAiIgIiICIiAiIgIiIC5NdtDuAbFc2uKIJFoeqxMkLcpzyOdoc/gjjuf1/faYDVdIymxBuY1ryacJ5GBo7diK/X6LVqKymW1PDmaxLcWm9daRockW6YzuxyXR/ZotxJIHBNtBaebF2oX1t17q3VmZPNklmNHM7c+OHjfx2ce5H/V2RaiKKb5rX8kViBERVOhERAREQEREBERAREQEREBERAREQEREBERAREQEREBERAREQEREBERB//9k=
Base64>e_14,DECODE,e_14
WriteLn>%TEMP_DIR%earth\earth_14.jpg,result,e_14
Let>e_15=/9j/4AAQSkZJRgABAQAAAQABAAD/2wBDAAYEBQYFBAYGBQYHBwYIChAKCgkJChQODwwQFxQYGBcUFhYaHSUfGhsjHBYWICwgIyYnKSopGR8tMC0oMCUoKSj/2wBDAQcHBwoIChMKChMoGhYaKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCj/wAARCABVALQDASIAAhEBAxEB/8QAHAABAAEFAQEAAAAAAAAAAAAAAAYCBAUHCAED/8QANBAAAQQBAwIEBQMDBAMAAAAAAQACAxEEBRIhBjEHE0FRIjJhcYGRocEUFfAzQlKx0eHx/8QAGgEBAAIDAQAAAAAAAAAAAAAAAAIDAQQFBv/EACgRAQACAQMDAwMFAAAAAAAAAAABAgMEESESMUEFE/BRYXEygZGx0f/aAAwDAQACEQMRAD8A5bRERgREQEREBERARF6QQaIIPflB4vaNA0aPFq4x3ESOjga55kaW9qPex7+wP6/dZePScgyxi3sa9wDQfiLgCK7+4o+3A47UEfRTHF6ZZlUZHmPnjcTyAe1/YV9KHburLV+ks3CfJ5DTM1gsgcuA/H+fdJ4EbREQEREBERAREQEREBERAREQEREBERB7RoGjR4tVPsuILA0uII9KB/jlVujDA5sj2h7bFcmjY49vc8WvcdrppKduc3dufZ4P3/f9VmI34gZXTMZhDZWyEtMh2sLSB/45+E/hS1jIXxgF5bLE1oceBZHF/Wuf2Ud06Ty5xMW7pQ4USOB7mh69qWZ06WTHmbNASJGO3WSQL9O3qujg0c25UXy7JRoGK3KyYoIcd8nmvZGYyADd8D1I59brj7qSTwMxRO6KP+tMkjXyMwmb9rCbO016Hbz2PAvtUl6A6Zz+odFBp2Ex/lyPmc/ztwBPLY6oWSSCb+Zxq+967w56sx+ociPSM/FZhs+KPJmlvdyWhrwWkl5aeTW3gUeAByb6nDOS2PriJj6/78ltRSaxEzDRfib0Y7T2zanjROjcxwGTE1lsF1Tg4WLvggmx9fmdrVdzaz0tJldNs6fzJsbL1cRU8vY6JkzHl1sDmihXNGrOw8AE1xJq2FJp2qZeFMC2THldEQTfY13Hf7qrT6j3uqPMT8n8SlkpFdpjytERFsqhEVcUT5XhsYt33pBQimOk9EZWUwST7mxkH4g00OLs+1U79Fc694dajgYbcnEvIHIdGQGuHc2Pft27/sggqIiAiIgIiICIiAqozUjSRdEccfyqV61xa4EdwguLjl+J4NhoLzRvi/X6mhdev63GC0Fxc9zr3Dc4GzYN2P29VZFwc4OHz2Pm53H1Jv8Az+clgCER/CS513Q+3Y/n2/8AluGN7I27M3GIbJxmOEVbbeeXfU+nb/pT7ww6di1/qPDxp5Y2wbwHMMrWPkO1zgBzuq20XNBrcPe1E9IwYsibGMktY7ngSSXt2i+eTdHn19/YGth9K6/omhZJycbD1J8/LGyf1Ee5sd9h8FXXr737rr2i04bUxfqmGvWYi8Wt2dL6Lpw03A8seVHC1hayKGmsIoUf2qhQA45oK4xIjJAXRyOYA48vs7j69/T2WotP62kdkOmw8uNuER5oiynDzWjgGwB8XNk7Rzf2UsweuHYx1HHzor1GJ7WsjYN4BI+QkGrB7/FxZHcUfBX9IzxfbLG1eefn3dec1bRvWd5SDqpsbn4eawluThyBwkaRe0kbmEFw4dQH04NGlwz4rYkuH13qsWSWOyfNd5xjBDC/cQS2/TjjsuwtQzcgNyJdSEEALpJnABzi1jmDkgHmm2B+fcE8k+N2rY+seJmsZGCd2LGWQRPu/MDGNbv7DlxBd29V1NDjyUraLc/f+eP7/dVnisRXaUFREW61xTfwz0v+sz/MfwwPaflPFH5vau/f2UIU/wDCLVosHW2wzPEbnO3RvLqIPHbjvwO3PH0QdHdN6M17MfCibO6Vrd7ow5uxxsENp1D5dvIdzuPryL/qjp8P8hxnaWvipzRQJ9xR4qnN4ogAg+yu+lNaZG2QGXGZ5Ld7JHXTuHBg+HmuLraPbkkVIupNXwsrpXKz8vKZjYkcbnSMc9ndpNnnkEbTwascGjdGXDniPpg0rrDOx2gAOLZABX+4XfHv3/KKw6s1X+99RZ2oc7JpCWXwdo4BqzRNX9yiMMQiIgIiICIiAiIg+gJoFtA9u9eo5WR0mpHhrhuoX83PsP0A7LFg1d+qu8CUxzFzW0SeHf8AHn6fgflTpPLEpfTIRE6IuG8ctcK5FA/r/Cy+G6mitx4AWC0yGbOjecaN73tolgbdjgWKCzkEMmM+GJ8T/Nk4aO1i+CPdd7SZ9qxE25aeSm87xDOYEbnuc6GSMPYK4Js3wefye3/tTvwrhyMjUcjFjDmBrBJ5tkBjvlo8XRFH8LXrm5em5BjnY+GRpO5jvpxRC274U6pBhaXrUubPBFAxrJWseQHg7TvPoX8NsNFj7WSoes5pnR2isdUztt9e8LNFWIzRM8Kuvs7H0fpPUJM1pD2Oa17CD8hDiew9doAPayO64/yp35OTNPJW+V5e6hQsmyp/4u9eTdVavPBjyH+3Mk+EA8EDgC7N9rJuieRxS12vP48ftY4p58/lu5b+5ebCIikrF6xzmPa9ji17TYcDRB914iCb6F4m9QaM14gOLK57djnSxm3D0vaRzXFrFdUdZ651MSNVzC+Ldu8pjQxt/WuT+Sa9FHUQEREBERAREQEREBERAVTXbQ7gGxXNqlEEi6d1x2Bks2ucw24Dc6m1XqbF+v05U20PXNOYzfnZ0Ton/MwSsBHfsCPv+OPVanRTre1ezExEtsa11ZokMz/IysjJa2tsdBxvjmxTfv8A5US6g651XVsJ+BFK/D02RsbZMeJ/+rsbTd5FbgLNCvXmyLUURStmvaOmZ4YisRO4iIqkhERAREQEREBERAREQEREBERAREQEREBERAREQEREBERAREQEREBERB//2Q==
Base64>e_15,DECODE,e_15
WriteLn>%TEMP_DIR%earth\earth_15.jpg,result,e_15
Let>e_16=/9j/4AAQSkZJRgABAQAAAQABAAD/2wBDAAYEBQYFBAYGBQYHBwYIChAKCgkJChQODwwQFxQYGBcUFhYaHSUfGhsjHBYWICwgIyYnKSopGR8tMC0oMCUoKSj/2wBDAQcHBwoIChMKChMoGhYaKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCj/wAARCABVALQDASIAAhEBAxEB/8QAHAABAAEFAQEAAAAAAAAAAAAAAAYBBAUHCAMC/8QANBAAAQMDAgQFAgUDBQAAAAAAAQACAwQRIQUSBjFBURMiYXGBB5EUIzKh8EJisRUkwdHh/8QAGgEBAAIDAQAAAAAAAAAAAAAAAAEDAgQFBv/EACcRAQACAgIBAwIHAAAAAAAAAAABAgMRBCExBRJBE2EUIoGRobHw/9oADAMBAAIRAxEAPwDltERECIiAiIgIiICIqkEGxBB55QUVbGwNjY4uveB+x72Qgu3tLbkWIzcHqOgP391IaPh+pqKZskfiMIcPK4gl7Qcftt9MDCCLIpUzh2OQt/U07j5L+oweowf4SvHVOFKmnYJKJ34pliS0NIeLZtt72/x8KZjQjaIigEREBERAREQEREBERAREQEREBERBWxsDY2OLqpBvZzQHGxucfwZXo6MMDmyPaHtuLZNjcY7dzi6rAx07yCXWJ3PN+f8A7zUxG+oGX0Gjjlc5zpJdjSSzyYdnoL+x+PRTLSmmkrYQ6cSxhx8QAkDYB5j9hjtt+FFNOc6OQPbcHDbtFrD45cln9OqG0scvhND5Zo3xyukAsAbYb8DJ9T89DBw5sovl0y9DTRTbHUsfi7muLmi422F9x7WFj/1dSyHSpYqKN+qxzxkOL4o9vml3g3NzltthN7XG3llRLT6iahlElM4tkALdwdjPa3x9vZb+4Z4Cp9a0Olral4iqBAfw3gNIZBMWjzuBP5mQB2O2xvkmj1OcfDis38T+qzj7yROvhzXxzwVU02mO1qCne0Nd/uWN84AJI33Hq03FhbF8rXa7VoPppSaRo2rvlfUapVGmdTTQyy+HHPAQ0uABHlcAbDzOF2tN25DeOtf0/wD0rW66hDi9sEzmMeR+toPld8ix+VzcPIpmtP053EeJ8L701ESx6Ii2FYiIgIiICIiAiIgIiICIiAqsIa9pIuAb2VEBsboLn8uQlzyXeUOeQDjGRf1Nhcg8/ve6LM+jm8aENMjceazhfOR9wsfhpa5oaHDGbOBycm+P+FlNNjpvDaPFcXEjcLYBIGOfe/b37WY9Rb83hE+GSo2h2XENDzkgW/a37eikroqVk2zT3SvjADd8jQ0vNzmwvbFlhY2NY6MAuec3cHcxf2uDzOe6kuj6c+ph8SJzcOsQSSWgA3cf7ea9BxvbqL76aWTe9Jd9K6RkvG2lumJZAyUEhrgC83AYLXBcNxaSBfANxYFdQsYyOmcGyNc4gDBvyzYevNc5UGt8OcO6jO3T9Nq658M1oKmesbcAdWmMAfquQeVjy6qSv45jq53VEUztP8RovTsc94vtAJDgPc5yNtrdDw/XvTuTzrxmx061qP8AQ2+Jlx44mtrNxzujo6N9S4F5bGS4WHIDt9lwr9cKdkH1K1V0LGMhm2SRsZba1uwAAW6Cy6epNdq9boW0ctW5um+LM9tTtG6oa39ADbixBF7F3W3QX5X+rlaK3juv2lrmwBkALf7Wi/2Nx8LjcPh/hbzWZ713H3beS0Wpv7oaiIui1xXVBRyVcwaxji3uO/b/AArVT76aaYyueNwALXh24utYE2IGOtgOvr1QZLhf6dS1m38ZEM4aMknkb4GMEd+dibAq64s+l7KenfNpj2RGJuYy5zi82uOff4tf4XQPDGkMmhdBHTta1z2su5oc0brgOJHPke5vbovGs4fAbOKcSQmNzXPicQRJlrXAjkSM3PIXyBbBOnFs0T4ZnxStLJGOLXNPMEYIRSn6p0MVBxrWxwlpa8MlIb0Lmg2REImiIgIiICIiAgJBuMFEQegJsC2wJxztytn+eqv9HG+Y77PBbyJ9xnvjosaDa9+qvdNm8KfeGf1A3tyz3HwO2fZZ18olNtMj8Q7WgbRl/Tlix9evwe5tnHU7IIGeBM/cbNMb+Z559RgfwrAUdfFGPGiiG2Td5S7LSe2MDH8ss3Sw1OqtfUadC6ZsQbvaMFjSeftc5PTqt7gXy1v3Oqx/arNFZr47XMLtu05F+ZHp6fZZWgb47ZCJP02vu/yD2t7d/RWZ02rilggfA9s8jmgOedrPNlvmNgOh526r1hp6mn1FkLQZHszdhOxwAvj9/uvRzzIms+22paP0u+4bC0JlPoPANXrmpz7IN7ntcAd20HaRbGbtJABzgdlyjXVUtdW1FXUO3TzyOlkd3c43J+5Wy/rDx/FrlNRcN6F5NDoD4kjsXqKg33uwSNtybWxkkYsBq1eKmbZMuTNfzaZ/b4/h15mIpWkfECIilgKb/TLV4qCvdBLK6MyG7bEgPxyJFj0GL/ChCIO5uE9egEEEcLNwMflqvKMkk5/pJHk6W8oIuRtPt9WuItE03RjV1NYQWAtJjkDrguHS9zm9gOftZcb6dxvxHp1P4FLqcjY73s+Nj897uBKxes61qWtTibVq6oq3i+3xXkht7XsOQ5Dl2ROziDVJNZ1mr1CZpa6d9w0u3bWgWa2/WwAF/RFj0RAiIgIiICIiAiIgL6a7aHYBuLZuvlEGc0zUovy4ZWhoBNnOOLc7kk8+fbopzw3xDBQU8sFNWUkRmZZxkewC3a/uP5daqRWVyWr0xmsS3c7jrh3S6d7nzVtfXtO3w453bLlvNrm2BHQ5zf3WsuIeKqzVy6ONopKYkkxxvJLr8w5x5+2PW6jyJOW89bT7YERFWkREQEREBERAREQEREBERAREQEREBERAREQEREBERAREQEREBERAREQf/9k=
Base64>e_16,DECODE,e_16
WriteLn>%TEMP_DIR%earth\earth_16.jpg,result,e_16
Let>e_17=/9j/4AAQSkZJRgABAQAAAQABAAD/2wBDAAYEBQYFBAYGBQYHBwYIChAKCgkJChQODwwQFxQYGBcUFhYaHSUfGhsjHBYWICwgIyYnKSopGR8tMC0oMCUoKSj/2wBDAQcHBwoIChMKChMoGhYaKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCj/wAARCABVALQDASIAAhEBAxEB/8QAHQABAAICAwEBAAAAAAAAAAAAAAUGBAgBAwcCCf/EADQQAAEDAwMCBAQFAwUAAAAAAAEAAgMEESEFEjEGQRMiUXEHYYGxFDKR0fAWofEjJFLB4f/EABoBAQACAwEAAAAAAAAAAAAAAAABBAIDBQb/xAApEQEAAgIBAgUCBwAAAAAAAAAAAQIDEQQhMQUSIkFRE0JhcYGxwfDx/9oADAMBAAIRAxEAPwDVtERECIiAiIgIiICIuSCDYgg85QcLmxsDY2OLrvhfscWxAuvm5Fjg3HrjAJH7AqxaXohr3CMySxENsSXNvt3Y+zc9rBBVUVzq+kDTSNEzXtaSdhBFnZvY9xjH8uovUOnJ4xvog+aPbuANtzvmAPt+9lMxrqIBERQCIiAiIgIiICIiAiIgIiICIiAiIg+m7m7XtuM4cPUIQb2c0BxsbnH8GV3SRNYHNe8BzbtAIJIIIuPT1OLriFjqiXaN5DnXdm/8PKnQkdIpYi/xTvdkiMuZYe/+VfNMooKhu6KcxVDMOLbktFuDf0Hp6drKmUbQzsf0PvfH24U9Qyywgsgkc17r7je1s9j/ANq/h4c267abZYhao2BtFWwTHxGxtEzCwG4JeGm1+x3/AGXbo2mCtrXRQzU7KZx2+JKdot2v3sBm9rcKOppBDSyxxMkMs4LJ3SHBbcENA9xck84sBa5ztCjqptXpodPP+6lkDI2gNOXYwHYv6X7q9fgbxWmGqM3qhTPiDodLDqFbU6edr2zv8SnAJ2t5BvnIzfJ+6o63/qOgen56KAV2l09RLHDJDM4Oc0vEjbSbje7rkuIvcjdcWOVoHLGYpXxu/MxxafcLy/H5mPk2tGOJjXz+vZdtSaxEy+ERFaYiIiAiIgIiICIiAiIgIiIC5YQ17SRcA3suEBsboMkBs5P5i8tBJ2kkHI7ept27/rm6fTEUkk7XMIa8McN1yHZII+WFHOs1oIAB49b85/wp3QKeJ9PK1zmybgfJvIIfY7bAHOe9sgn3GynS25RPZK9O1DaCup6yWkp6yNj93gTZY42PIHb+cKVZI6pqaicQxQmV5cIoWhrQCb2b6AdljxaZC2Imorqbc0lro2l7pBZxBP5S3tfng98hS1HR+FA+Q+drSA17Hg5JIyOR3HHP0XZ4efFa3fqq5aWiGe9tEKSnZTeK+fbumc9m0XyNozkABubDN+1lcfhdQD+rtJqKhkgjNRshLWB4dK3aSCLjhji64Jtg2PBqujUjayfY6UReXFxe5/t8yPayucOsU/T0MMWjUlDJX/h9lTVyM8a8viEnbuu0eUAXbg3zcgW63IpOTDPHpG7Wj9/n+/grVmK289u0PfdU1OipmSb542/hryyNLshrRc454yvzjqQBUSAN2+Y+X/j8votmNY60MtDXVupQtlqRTXErCI8tZYENAtcEA+h2kYBxrK8AOIA4xzfPfK8THhGTw28/U+78vb/XUjkVzR6fZ8oiLMEWbQ0T6jabXDyWMA5LrY/f6L03o3oqKWOOSvYHROJAs4cYuHAHmwGLZtnkoPJUXtOu/DEV7ZH0Yhp6oR7wIgS1xtcb8kD5kcdwvGp4ZKeeSGZpbLG4se09iDYhB1oiICIiAiIgIiICAkG4wURB2AmwLbAnHNuLZ/nzUnoUjmzA4cRkEm5HYc+yiQbXv3WXQTOieXNZdxI8wH5c/wDo/X2WdZ6oleKeUSTHdGGvYCzA2nPlt72NrG/HzKmdMBLA17WuPJ3dhkYFx7/tZRXTVVDLRyMqY2vdHtMfbJcL8C5HP1sb4CtE1RR0sj56dgDmmwaSNt73vjn6KN2i2o7p1ExuWZ+Co46UvdLLDNbygDe1xF8EWBuSG/UnssMTgxEBxNrg2Ofe9vQH+yzKSGq6ijcNMi3mmb4sviOYxrsgWBNh+9zj17azSZNNfDHMR4Zb55g4OAsb2AJwf0IJPoV6jgcq+LF5c9t2n2+P5UM+Ot7bpHREa2+F/T+rbXMa9sEjruOPyn15ve31AzheKq0dX68KyWWiong0gd5pGEjxLcDtcd+MkXVXXE8R5EZ8vp7Qs4aeSvUREVBuXboSlbU10ZJDnMjAaxrgO/POeTzi4I4wtgqLp1zqSlc6FwiN42ANLbOZIWmxsPNjNr8Aei1y6G1RtFPIwC8rm+Vt7brG/wCvI+YsPVbU/DqrgqdGrI6uuZG3wnBu1zTclzTgX4vbF7u+5MMtnTsrIXbqmzZLAPmBJcQ0WFuwvjgC+PVarfGijFB8TNbhuPE8Rr5AL4e5jXOGeckn6rZTrPqbS+mqaq1Co1CV1Mxv+lE5wEk77AOjaDYnsL2I74DVqHruqVGtazW6nWu3VFVK6V9uASeB8hwhLBRERAiIgIiICIiAiIgL6a7aHYBuLZuvlEFg0XWI4ZGMmY0AOG1xPAGcn1+f2Vqh1PT6mpa+SaihbtuWiTy3JJJ8zuRcj/Nz5qi2UyTSdwiY29hg65oNBiqqelrHOjk2tkhpfPvvnDz5bD3PPfKpfV3W9Zr8Ypaeni07TWElsEJLnOvzvkOXe2BgYwFUkS2W1u8oisQIiLWyEREHLXFrg5pIcDcEdlPUXWOv0UQjptTma0ADIa44+ZCgEQZep6lW6pU/iNSq56qa1g+Z5cQLk2F+Bck2GMrEREBERAREQEREBERAREQEREBERAREQEREBERAREQEREBERB//2Q==
Base64>e_17,DECODE,e_17
WriteLn>%TEMP_DIR%earth\earth_17.jpg,result,e_17
Let>e_18=/9j/4AAQSkZJRgABAQAAAQABAAD/2wBDAAYEBQYFBAYGBQYHBwYIChAKCgkJChQODwwQFxQYGBcUFhYaHSUfGhsjHBYWICwgIyYnKSopGR8tMC0oMCUoKSj/2wBDAQcHBwoIChMKChMoGhYaKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCj/wAARCABVALQDASIAAhEBAxEB/8QAHAABAAEFAQEAAAAAAAAAAAAAAAYBAgMFBwQI/8QANhAAAQMDAwIEAwYFBQAAAAAAAQACEQMEIQUSMUFRBhMiYXGR8AcUMoGh0RVCUrHBIzM0ovH/xAAZAQEBAQADAAAAAAAAAAAAAAAAAQMCBAX/xAAlEQEBAAEDAwIHAAAAAAAAAAAAAQIDBBESITEiUQUTMnGBoeH/2gAMAwEAAhEDEQA/APltEREEREBERAREQERVIIMEEHnKCirBgGDBxKy29RzCWtbJOcc4yPyx9YI32nafTrNourue1roY4B4ON3pM/k3I7D4II2int34F8hraoe51MDc5o5HWP8c/uY9f+H69KmatsDUptbJEySO4/L5Y7q8duRo0RFAREQEREBERAREQEREBERAREQEREFWEh7S0w4HBmIKqQZhzQHGDJx9DKue2AASBBgwZBI+HPPKvosdcVdo3kOdLsz9HlXhGx0i1omoKrt7huhhLIHx/9Uz0g2jiadyzy6L3Hc4bjABAH5+o9v1UbsKbaVBrtx2n0tkTkGSJn8/ktjQp76kHPT4Adf1Xc2+1y1Kzz1JjE3uLJtpTFzQud7WkloezEdvdp9Xy4yvLqdJlK8qUaLG0Q8iqHOO5mxwDm55y0j5/Fa+gX1X0PvLqtWhTMBofB2zmDGDzmFXxJrTKDBcXe3ft8ujSbjAEBoPMAQJM9JJK9ObKY49Wpe3uw+bbeMWk+0XwxXsq1PULej5lCtTbUfUoUyKckGTPeWunAkCY5UEUxPjTWqljdW4uWmxqj1W76VOqD6QADuaSQBkCYlpIA6RCq0Mqva1wc1pIDh1914GXEvEduLURFFEREBERAREQEREBERAREQFVhDXtJEgGYVEBgyg9O5tQOdudu2hznQTBE9u5jMdfn7NOp1A0FoJBJZJhwBGTHsNwz3/Ja54aGggQRjmZyc/24W50m48i0dQY9pbUduf6QCD8RnpjPUrTCXqS+G7qWt3pop0rqm2l51IPABBDmlxg4xOY74Ul8K6nT0vT9SoVNKsL2vdsbTpVrlm80BmXM7OyDPtkELyttLzVtKsn3YPm0wKVBoiDRDC6AAIJkiSSCJ4M+n3v0mnZ7duoWtYGf9lxfkRyYHf9CORC9TS3Glh6dT8uvlhle+JpzaP3igLsVPu+9vm+UAH7JztnExxOFz/xjq9DWNcuLixpPoac0ltvRc/cWsAAkmBk88dgeJU18W0zp3hmo98edWcaIJe0tc07RgDMwXHIHHByuXNMln9W4HET3x+391p8U3OOp046d7frz/E2+FnNrLRqimHbmlxxLmkggbgZnpx/2WC4/wCRVlgZ6j6R/LnhXOMsM5bPQYHcj6HRY3gBxAHGOZz1yvErtLURZKdF9Rj3MbLWfiPb6hQY0W+03wvf6gx77djgxg9Tnt2t3QTEnEYIn2Wv1TSrzTHNF5RLGv8Awu6O+CDwoiICIiAiIgIiICIiAgJBkYKIgyAmAWwCccxxGfr3Wx0Z5c57S1tT0xDj7QPlC1YMTPVemyrGjXD2g7nHaDxBnkfsueF4qWOh+H7+naNqNpsqDe3+cyTxEdfxRj/BztW3Da1HFBlN8uedvUdBt4AEHpifZQ7Tb+pQrUntEx0A5P7fpz0XSNBZa1LelWqUqb3vpFzmACDBA47yHfpwIWm4x4k1E0/VelEvtH3Dw1b+mQLprS6CZO1/efoLnDXHvMY+PPT4d11zx991vNBrWdrbeddVCyvSg5Y6cxn+mcEdeJgrkgG3jt1Bz1/yPks5jlJLZxKvaXiKOgMg9OPr6GPdYlc9wMRwO6tXG1VzGOqPaxglzjAHcqT6BaCvXp0yC5jSIAZO5sbhjJkmeP6faFFl0jwB5Fa/dSeXUw5zmCpEQNpbJ3DMSOR09pUE88OWzGUYqUqW5zB5Y2yBMBpIxMH4x2MQptf+DbPWtAu9LFqH16tONzKYc9pEw4D8TiJBBzHYTinh5lva03CtTqutnQYAneCJkcdBz0gromn3ujWeiXd9dU6NKhQp1H1KkF3pY0OJLBIjZB4gFpMIr4GuaL7a5q0KoipSeWOHYgwVjXr1e7F/q17eNpik24rvrCmOG7nEx+UryIgiIgIiICIiAiIgIiICua7aHYBkRmVaiDeaTqobtp3MHhrXOOB7k8+3MfBTiy8Q6bHl0zaNp7Mtq1NoaZmB6uvM+65WivPufZ0y78Q6Rp1Ultwbi4Y4H/QG8YEgzgHPv8+kN8U69/HtTr3gsre0fWcX1PKEGoSZJdAAOZOAPeYlaVFpqa2ep9TjMZPAiIsnIW58PawNMuJewOYQGn4TOevy+WVpkQfQekfazorLQUa9y+zky406L3bhsgyI5cSQeRz0MCF/aP8AarceI9PfpGjUq1jpNQtNfe4B9wRxLRhjRP4QTPPsuYIgIiICIiAiIgIiICIiAiIgIiICIiAiIgIiICIiAiIgIiICIiD/2Q==
Base64>e_18,DECODE,e_18
WriteLn>%TEMP_DIR%earth\earth_18.jpg,result,e_18
Let>e_19=/9j/4AAQSkZJRgABAQAAAQABAAD/2wBDAAYEBQYFBAYGBQYHBwYIChAKCgkJChQODwwQFxQYGBcUFhYaHSUfGhsjHBYWICwgIyYnKSopGR8tMC0oMCUoKSj/2wBDAQcHBwoIChMKChMoGhYaKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCj/wAARCABVALQDASIAAhEBAxEB/8QAHAABAAEFAQEAAAAAAAAAAAAAAAUCAwQGCAEH/8QANBAAAQQBAwIEAwgCAgMAAAAAAQACAxEEEiExBUEGE1FhB3HwFCIygZGhscHR4QgjQpLx/8QAGQEBAQEBAQEAAAAAAAAAAAAAAAECAwQF/8QAJREBAAICAQMCBwAAAAAAAAAAAAECAxESBCGBFCIxQUJRobHB/9oADAMBAAIRAxEAPwDltEREEREBERAREQERekEGiCDzug8XtGgaNHa1dgkc1rmxtt5IN+lb/wBfL9qm+ndP81muQSFrW/ebrG7bFbgb/wDjuP6pBryLfn+BmSwMycSR0kWnWW3yNz/R22qvmtd6j4fnx2OfEHHR+Jjvxd/b24/lXUiDREUBERAREQEREBERAREQEREBERAREAs0g9AP5KrS4HRot5Ir1/L5qsggW2xwAePT2+v5qhZJJNpa551G3EHmx399z+q1r5JtJdIw4NXnvc5wv7hLKF3Xr8vrjbekSRsIcIC82b7030Pryf8AChOlYtRNEYcLF2dya/zQ/ZZr3RCwZB5LaJc86Q3j32N/0u+DBOS3GPLN78Y23aHpmJm4ckuFPIY2gvdGWbNI3IO4r5/Qx8+NjsSHJcwl0hfEZmiw+VhBJdXNteyz3I9ytYx+uYOPE/Hbmv8ALOz2BriHG9u247jtf5LNx/FODl4GLh/aPIha57xFJqALzy91ktDiGtG1bBvfn6mPBimYi14nzDzze2u0Ivx/4Y+yxt6v08OmwX7PlDNLdQIaTR33Nb1vq33taMupvgh07G6m3xHBKIpsfKxGwuYbIkY8O1cEWCOaIO43XNvinpEvQPEnU+kzm34eQ+HVd6gDsfzFH818PPNcfVX6aPp1+Xrpu2OL/dFoiKAiIgIiICIiAiIgIiICIiAiL1ppwJ3pBdcQ+yO/1z+VrPwnBojo+XMHEeaZa7/sLvfj+48U2tVXzVbGvdVse5umNrmkWTRpwuq479/X/PSJ77RKDqj2Nlkw2U8AAyWQG3tdHm/f9KUbkTPyZXyyuD3k32A3Pt+Eb8bDn5KmN7nvJIDzIA0t2FgG6H/qO39K0ZHH/e/8/W6tsk2+KRXS9LJreZC1rQ6iQ0UL/cdvrcKiho9QAaP1xz/CpB1EAc3Q53CqG+n11Dgi/Xb6/VZV9a/46eNR4a8aR9PyWa8fqTfssTy4/wDQ8kOaeKpzmtG9AatVgA3rvxyzWdT+JXUs+KJ8TMlkL2teQSQI2tBNeobwtNwZZ4MrGlwyfPjka6Ghqp4IoixXNcj0Uh41yJcjxJlunc5z26WEu52aOVmcEWn1Ez3j2+J7/wA/S89Rw8oNEV6PFnloRRPe4mg1otx2vjnjdQWUVcsb4nlkrHMeOWuFEKhAREQEREBERAREQEREBASDY2KIguNBLbaBxR39+f3H6L1tirAAIr0/n63VsGgR2KuBxc7VRtzr27m/9rUIGwBvdi9z7fX1sqXPFtFag31J39vld/qqg/h18ADb5/6Xkg2BJ9vo/XZJFsGlcabFnfTWx3ur7KuRmlrg4t8wuBoAAURe3t+3HPa9gYOTn5UWLgwvmmlOlrWt3P8AXfk8VypUlf6KI257JpbbFAPPLgRsBxzyS4gV9DAyp35OTLPKQZJXl7iPUmypHq0kGLEen4UrZ6cHZGS0bSvArS092A3R21E2e1RTSWkFpII3BHZbvb2xWEiO+2bFiEt0aQXEOc5zRqoANIr3vb8/QhfTvBXSIhiRue7RMNLHubGPNDrcKaL373vyfmtP8OQMzs6OKIMJLbGwAFEcA9vvPF16D5/ZPBvT4pIY9MgY8DUNMgYBtyL4O4r0IXNtmZ/w2xOu9GnhzGOZmNieYpmj7sJ5a77oF7Nojk/Oq5r6jhzdO6hlYWSAJ8aV0MgBsBzSQd/mF3h4Q6DFrE7Zg572hw82PWGOBqgCfxaQ4bE7F3NlcZfFd0TviT4j8j8Lc2RhNg24GnHbbdwJQlqiIiIIiICIiAiIgIiICIiAqmu0h2wNit7VKIMrH8uYsjllMQsgd2ixzuduP/iy8fprJXs8zPwgCQDrlO1nftxXv35UUiuxPy4HScKSszqjshwBD48JuvejpqQ0CKq9vULEyurnyHY/TYThYzhUmmQukl2o637ahyaoDfjhRaJyTQiIoqX6HmeVnRSOI1BwBBF2CQD33JJF+w57L7x0XPxZo4fsIdl5Ekgla4yV96wdWng2B2J7nhc4K4J5hC6ESyCJ3LA46TvfCDqLxX8V8XwV0DIwOn5xzPEBj8vHZE7U3FJJ1GQ8bbkNrewabyuW5JHyyOklc58jyXOc42STySVSiAiIgIiICIiAiIgIiICIiAiIgIiICIiAiIgIiICIiAiIgIiIP//Z
Base64>e_19,DECODE,e_19
WriteLn>%TEMP_DIR%earth\earth_19.jpg,result,e_19
Let>e_20=/9j/4AAQSkZJRgABAQAAAQABAAD/2wBDAAYEBQYFBAYGBQYHBwYIChAKCgkJChQODwwQFxQYGBcUFhYaHSUfGhsjHBYWICwgIyYnKSopGR8tMC0oMCUoKSj/2wBDAQcHBwoIChMKChMoGhYaKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCj/wAARCABVALQDASIAAhEBAxEB/8QAHAABAAEFAQEAAAAAAAAAAAAAAAYBAgMFBwQI/8QANRAAAQMDAgMFBgYCAwAAAAAAAQACEQMEIQUxBhJBEzJRYYEHFCJxkfAVI0JSobHh8RbB0f/EABkBAQEAAwEAAAAAAAAAAAAAAAABAgQFA//EACYRAQACAgAFAwUBAAAAAAAAAAABAgMRBAUSIUEiMYETFDJRccH/2gAMAwEAAhEDEQA/APltEREEREBERAREQERVIIMEEHfKCirBgGDBxKy273AFlNo53EGSdoznyx1x/EbrTLEV2sdU7SC3LTUAlsyBMeHLn/yEEfRTy24Nt72194o1+zayWubUwGnzMef9LQarw7c2b3tYx3NTnnpu7wIOVemU20SIiiiIiAiIgIiICIiAiIgIiICIiAiIBJhBUAnYFNhBbnBlZQAWgiQ3uzt/36/6V9BzhcDlEyS4tcTDsbeuY+asxpGx0qwZ2nbF8hpMB9MjMwOu/Xw9VKrHsmuDqNOrVAGfhE49cZPidh6RrT7+hTJ7TtWF0l9QfEMgmJHjHh/S31vcW1xFS2ug93fAPeGckgmRGMnrnzWeOk3tFa+UtOo3KZ6YzT9SuDRc+vSunGByN78HzPrnqSrLu15rO6trebilatNWSfiZTc8NIkTEEt+rlo9MY2i/nZzczT8BDoz47eQPple+i406VRtKWmoOVzmkgls93G4Jg/MBd7Fy2fM7hqWzojxVw9T9z/EdMlxptm6pksBHdl4aDMS4DbMc2JIENXeODLH3viB1r2HbNu7etSfT5Q7nb2bnFudu7uuN8U6PW4e4k1PSLnm7SyuH0SXN5S4AwHR5iD6rj8bg+3zzj+W1it10izVoiLVZiIiAiIgIiICIiAiIgIiICIqtMOBOYQZS4Okjrjw38/RZGODHN59jIcAZ5jtO8dTB/wBrEIbHNE7xGDHmrqfwVG8pbzZ3h3SPv7nNFnaTT5XQYOwAB6dfT7yryHNeA+MRIwRGIO/mq031CIbDnOAEYnEY3n9IVj6xcGzuIHiIAEY+91N6En0HjK/0nTrmwqUrS8s6/wARNxbsfUa4xllUtL24ERMZdgEyp1wzrFq5hvqFGjdNfSdTDKwMU3kRJAO4k422OQuPSC+GkGDAOcj+/BSXgG9fR1pttANO5BDh1BaC4EY+YjHe8sdblnFzW8Yb9627fLXz4/T1R7w7J7P7e7/5bY3FgGmpbO7d73kBlOm3vucSCGtg79CQuV+2uX+0TUrg8rhXIqCo3aqNuf1IJXSdRvaX4YLe0tvdaTm0nV2se489RgeObLozznYACYjBJ4rxhVNTiC5kyGcrR9AT/JK9+dYdzGee3jX+sOEv26I/rTIiLgNwREQEREBERAREQEREBERAQEgyMFEQZGglstA2g589/wCR9FVsiJAAIjw/v7ysYMAjoVkDi53NBlzpx1M/5WUIGQBmZE5Pl9/eFa54lojmDfEnPl8pn6q4P2dOwAx8/wDCpUGASfL7P30SRjBhTb2SWFXUOMKD6YY9tnSdWqMfB5m9yACCDmoN8AA5UYtdPuL2saFrSNW4c5pLWgAAHrOwbJEmQBjfp2L2caPTsW/hxqUnW7nCrqF3y7MEhzWkQTgloEky4xE4yx4r5N9HbXn9HVWs+pi4k1Ggxt5eMFKnRZkw3lB8AAfGMTn+VyPszcVDc1w5z6tQucBIj9UbZJnGfBb7j3WLS8vxY6RXdVsKJ5TXczk7Z096ATj67fJal1CrUqvaRUIBcO+f2yAT4wY8Mnznc4/iozTWlPxrGoeWLHNdzPvKXcLaDSuKTLiqylcOc7vuMNMZ5gIyc75yT4BSjV/ZJV1HQKmoWVCna3opNqULdgIFZxMGmRsHTgEYyJOQV6+DNOZQ90/MDqdIcreb9Lug+ZA8fqu88IaTc1LR9OrTrMcXA0q9Kp+Wz4Q4HB6nmHM0zkDAyue93wc4FpIcCCMEHoqKT+02jQt/aDxBTtAwUReVCAwQ0EmTA6CSVGEQREQEREBERAREQEREBERAVWkCZaDIjPRURB6LZlOrUa19UUZxIEjbMkn78lv9HsNENwx+p35q02nmLQ4NDoOWnMx5g5nHiowiu0dercYcP6To1HT7K0taYpVA97bQGo9/wQZe6WGcSQZxGdzAtd4rv9UpPtmH3WyeQXUKTjDiBA5j1G8DbKjyLL6lor0x2g132Le8P1g+7a6s9sO/LfzHxOHZx1I+cHqVolVpLSC0kEZBHRYK+hOFqlUdlStbl1cPDXOpMaS1pPXfO5/jO67JqvHljwPwRX1XVHU3XUkULdx/NrVSB8B6t7szmBH7SF8Z6dxXq+n0y20ueR0crX8gLmien31Xg1nVtQ1q+deateV7y5dP5lZ5cQJJgeAknAwJRWPVL6vqmp3moXj+e6u6z69V37nucXOP1JXlREQREQEREBERAREQEREBERAREQEREBERAREQEREBERAREQEREH//2Q==
Base64>e_20,DECODE,e_20
WriteLn>%TEMP_DIR%earth\earth_20.jpg,result,e_20
Let>e_21=/9j/4AAQSkZJRgABAQAAAQABAAD/2wBDAAYEBQYFBAYGBQYHBwYIChAKCgkJChQODwwQFxQYGBcUFhYaHSUfGhsjHBYWICwgIyYnKSopGR8tMC0oMCUoKSj/2wBDAQcHBwoIChMKChMoGhYaKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCj/wAARCABVALQDASIAAhEBAxEB/8QAHAABAAICAwEAAAAAAAAAAAAAAAUGAQcDBAgC/8QANRAAAQQBAwMCBAUDAwUAAAAAAQACAxEEBRIhBjFBUWETInHwBzKBkaEUQsEjM/FDUrHR4f/EABoBAQADAQEBAAAAAAAAAAAAAAABAgQDBQb/xAAhEQEAAgICAwEAAwAAAAAAAAAAAQIDEQQhEjFBBRMUIv/aAAwDAQACEQMRAD8A8toiIgREQEREBERARFkgg0QQe/KDCzRoGjR4tcsEhYC1gG9xFOJqub+74/iprTsFsrI3y/ELXNHy7xyLsC69A3n/AIQV9FfcPo/G1AubFIYpmD/bJ7iid3bn/HkKB1fpyfDO6A/Fj2lwIIO4DyCOD/8APKnUo2gERFCRERAREQEREBERAREQEREBERAREAs0gyAT2BPhOzeW9+QVyhpPAFN7dq7fr73/AMLs6ZE7J1OKFg5e497IIonnyeLUzGkJHQ9JdK4ztf8AI1xaRI0tHB9b7ir9q9QrFhNxwxjg2SSXcQRtFdvHPv8Ax+3HHC6ZrccDYIr3kirO0XfHqDz2UgyKQHfPJLTT/fzxVVd88UP04U17nSZ6TGHkYTgyPUGPbH+Rj2XuHeufSvb38Lt5+nwxFuHC1zzMP9KN53OLz+WqHF9v1B/tVax4g4htkBnivF34+n33UlVyMc1jQR2aOQP3u/v6L38H51vGNyx3zxvpTOpdFYIXZWO1sU8YuaH5rdzy4Cu4vkegv1VUW5tJxYZNXxm5IjEU7/gymV21ux/yuLj4G0nlar6k0qXQ9ez9MnDw/FmdH87dpIB4NeLFH9V5fP439fLqPU9u+G/nXaNREWJ1EREBERAREQEREBERAREQERZaacCeaQcrjYcLvnntyfr/AD+65YZX400EsZDXtJAIdz3+vb6V5+q4QAHNJFmiarg19+6Bo3NaCLN9jfj7++90LNpPVDopGh7I4pCwxl5YHtJJ7kOuuLHH/cVcNK0zUzo2T1DiYJbpLZRE/IhJcyO6qOi423lve+doJs86sje80BT3GuOxNeLBv+0cf5pXD8OeqcjEzW6DnZvwNA1WWKDMstZsAc3a/e4HYAQLNHizR4Wjj8j+L/Mx1M9qXp5drj0nqc2ha3j6riRY80+O4vY2dodGDR8WDY7ivNUs5mQ/Myp8mbYJJnF7gxoa0Em+AOAPQKRi6aEGOX5uXDjODd8UUjnF0gIdW2mny0CyBW4eDx9Q6fB874nN/IQ1su6w7jkUO5548FfQcb9HjeevvrbHfBk0Zj8nXNcdkY8LG5M7tzIYWfLG1rb4F8Ma0D2AHoFrr8acnHzfxH1bLxJXTRzua/4hbt3O2gE1Z4sGvUc8WtgwZETcXJMkYlmkb8sm8Etvgg8diC79aPg3qDrCT4mv5A8MDW/wD/lZ/wBvDEUrb1rqFuJeZmYQqIi+cbhERAREQEREBERAREQEREBASDY4KIg5GgkBzQLHfn+f5H7LLbFWAARXp/5++Vxg0CPBX3vNl5Hd27i6v7KtEoZNgDm7F8n2+/vhZja6aaKKJu9xcGtBd+Yk9vFC7/ddjHwcuenRROqgNzraCQRxZ7nt90rPoGHFppdLKA/MoxtJHDB24968+9Djv3w4LZbRHxW14rDbGqa2/N1BhlihlFbvmDxu3tt1HhwFnwasOI7m+tgMkfNHG07KbYcRQ489uO1rsdJzO1DSy7NEJZDM0Rh0YtgF3TvzACx7ceOVG/iB1G1mmTxYjWNMp+CXRHkNJrYb9eePcWuWTHauS2Ovel66msXt9VjrDrafMj/o9LexmFEdwnMY3P2juO9A/TmwfQKK0Tp6PUy5+TjSzGQuIdsI3u3Gzxz6+t17Eqs48bMrOjifzutzmxsJvdz59ePft27N290RBLI5mT8Eyykjca4HA7Dx/wC1Xyt4xSZ6gnUztSurvw01LSNDl1rHikdhxP25ETm06CzQI5+Zvi/p3HK18vd+l4cebp0jc3FZLjSY7/6iEPAd8NzHcEd2337d3VZo34a1bEOBqmZhk7jjzPhs+driP8KpLqoiICIiAiIgIiICIiAiIgIiICy0gXbQbFc+FhEExpWota5jJ3VyACTYAA7m/v6K34evYkkIinlxJRQDXymns8d7BIHcXYWuEXSuW1fSs1iW45uvdH0uORmHHjyktApsbpCLbdjc7aa4uyfpxS17rPVWZqQbE2NkGK0h3wmE24gVbncE9zwKHsq8ijznUxH1Mxv2s2nxudn4zmuAabbyOKAIBHFHsTQoC/SydxdB574p497ai2/9MghpLSAOPc1ddzz2Xn7GypMc/KePbgiyLr9grx01+JORoTQ6LTYJ5gxwBkkOzcRwdoFgA80CPSwFRL17r3WGD0j0Fk6vmSQfCx4GNh3sIORPtGyMN4JP5R7AbuwNeB55pMieSaZxdLI4ve4+STZKm+rertZ6ryWS6xlukjj/ANqBnyxR/Rvr7mzQAugFAICIiAiIgIiICIiAiIgIiICIiAiIgIiICIiAiIgIiICIiAiIgIiIP//Z
Base64>e_21,DECODE,e_21
WriteLn>%TEMP_DIR%earth\earth_21.jpg,result,e_21
Let>e_22=/9j/4AAQSkZJRgABAQAAAQABAAD/2wBDAAYEBQYFBAYGBQYHBwYIChAKCgkJChQODwwQFxQYGBcUFhYaHSUfGhsjHBYWICwgIyYnKSopGR8tMC0oMCUoKSj/2wBDAQcHBwoIChMKChMoGhYaKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCj/wAARCABVALQDASIAAhEBAxEB/8QAHAABAAEFAQEAAAAAAAAAAAAAAAUBAgQGBwMI/8QAMhAAAQMDAwIFAgUEAwAAAAAAAQACEQMEIQUSMQZBEyJRYXGBoQcjMpHwFEKxwYLh8f/EABoBAQADAQEBAAAAAAAAAAAAAAABAgQFAwb/xAAjEQEAAgIBBAIDAQAAAAAAAAAAAQIDEQQSEyExBYEiMnFh/9oADAMBAAIRAxEAPwD5bRERAiIgIiICIiAiKpBBggg85QURZVrV8OaYa0v3TuLwBI4ycYz8ypfTrNtbw319wpPA/LbHBLvQejvv9EGvIt5o9L2Nzte5zqIeMOa7ytcQcOx7T9lD6103UsnuNpUFxTaDJHOOcfzj6CemYRtryIihIiIgIiICIiAiIgIiICIiAiIgIiASYQVAJ4BPZOG5bzkFXhroHlB7Gcccr1oMbUuGsczyyST7c+ytpCW6f0s3BfcU3yxkzvbtBE4Mz9fotqp2DLStSbehpzllMh1TETiYjt3Jg/R0sKbaLK4adttO4OkFpxgQOOfiRPvK0rZ76nj0atyC97vDh5BDCeD2A74xIUfrPlPuPC6yu6LNvhUCWEHyv9OR3j7Dj9s67qabVs6tSzoChcU53h1Q5idwDZ4zHrA7cqOuKG2mXOLi8iQNnuZiOPTgf7V1vZ1BYvqC3LqLHBlSqKctBMlrSeB+kx3wV2ODwozV7k+mbLl6Z00fqzSGUH/1Fu0CWtqPDZM7vNPAgiYMADE+51hdZr2Rr29V74fTkMcCQeZjB5w09o7egXMNVtDY6jcW3mLabvK5wguactMe4IP1Wf5Di9i8THqV8OTrjyxURFznsIiICIiAiIgIiICIiAiIgKrY3CeO6orqYmo0ASSRhB6OyIJBzkj4+/H/AKsuxaWncCTH6T/mPqsJoyCfTnbj+SpCx3NoFk43THvHK98Ubsrb02rpa88O7oULmrUp6c+sH12tLi2OCdoBk7SQPkLZNVFanSLLWkaun06pArGhtdLmgsBMbhiSBMYPwtTsKradejVDQ0sLTJZvDiCDLg4kHnjjj1K3zpbqa00xl2HWniCo4vpOe5xFN7QA14aHtAqcneQT2zuK6ccf8oyVjzDP3PE1mVLvRNX0nSNPr39s63sr+l4lB+4OFYCHAxOOW8xiIHK9LfWr+30K40ajdbdOuXtrVqQaPM4RyYnsMTGFs+l295rvSdazu7V1PTrR9R9g5pJArEMG3dJkCW/2Gd7hubIKwLrR9K05+wvdc3rHObVt9v5dOHOYfzA7zZDXYEeaJkZ1V5+PjxFc9dz/AJrX9/rz7Nr+aT4QLRVNv/SUqlQsr1Gu8Fonc8BwaY9fOR/yK5h13TbT6jq7d+aVIncIzsAP+F2S5tripcWj9NZU227Cabaj2ks2u3EggCcmfWTHouMdbXDrnqW8qO2zInaIEkAmB2yThU+VzY8+Ct6THv7+/pPHralpiUEiIvnm0REQEREBERAREQEREBERAQEgyMFEQejQSA5oEjnP3+4/ZZtgTsIIgDPH8/hUeDAI7FZmnipVuHbR+rJOYGf+1647RW0SrMbhsNmQWHmFM2OW05aHNB8wE5E8GFBaXTq1rllGjTc+o/Aa3JPwO/fhS9/VuNMsHtc3w3kbSCASBmZE5wOR9yF3KcmtKdXvTJOOZnSbZ1m3Rruu7SLffdxU2guPg0ZAJxG5xiAYLee4kL3t+rdW164rV746b4VQtdtazaWU2SGgOc6QNu0ftPGOXVN7sCA1zgIqvkAZ7zxG0/tHZdc6CoURcW4cGl7zDXObmSYbAPcEzgQMlcPNmtmt1Wa61isahJ6xeO0rp+vqbzUawAMZVAcQe4IdiMeXvmRwuBXFV1evUrVI31HF7o9SZX2g7p+26m6P1nSrmlbNp1qDWUtgh/ibifK2BkbRtn+6Mdz8XVqbqNapSeIexxafkKs3/GKwnXnaxERUSIiICIiAiIgIiICIiAiIgIiICuY7YZAz2MnB9QrUQTWl6kGvDartkmBk7QPqf9/spa9v7WtZNi5puLHtcQecGIGcxE4+/C09FeLzEaRpN0ntbeMFSnuaKgBAmJ3QMkexye+/1XbPwsZQr3Nu7wvEc3d5y7ZA2HdnsBn4wBiVwWnfHwmtqSXteHh8B0n3B5MH17D5XR+jOu9L0Njbi6D6lZrQ11Gm1zS/4Pbt3VFofV+pXmn6R0ZW1e8MWFnbPcXO3l7CBIE45JIGDlzYJBXwFe3D7u8r3NSA+tUdUdHEkyf8roP4mfirqfWVmzSqLXWWi06hqOpB0vuXzh9U8YxDRge8ArnCIEREBERAREQEREBERAREQEREBERAREQEREBERAREQEREBERAREQEREH/2Q==
Base64>e_22,DECODE,e_22
WriteLn>%TEMP_DIR%earth\earth_22.jpg,result,e_22
Let>e_23=/9j/4AAQSkZJRgABAQAAAQABAAD/2wBDAAYEBQYFBAYGBQYHBwYIChAKCgkJChQODwwQFxQYGBcUFhYaHSUfGhsjHBYWICwgIyYnKSopGR8tMC0oMCUoKSj/2wBDAQcHBwoIChMKChMoGhYaKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCj/wAARCABVALQDASIAAhEBAxEB/8QAHAABAAICAwEAAAAAAAAAAAAAAAYHBAUBAgMI/8QAMxAAAQMDAwMCBAUDBQAAAAAAAQACEQMEIQUSMQZBUSJhBxNxgRQykaGxI9HwFUJSweH/xAAZAQEAAwEBAAAAAAAAAAAAAAAAAQIDBAX/xAAjEQEAAgIBBAIDAQAAAAAAAAAAAQMCEQQSITFBExQiYXGB/9oADAMBAAIRAxEAPwD5bRERAiIgIiICIiAiLnadwDvTMZPg90HCLKtqhp7qTQN5dIdvaACOMnHn6/zuNPshXdTqVt7KT/UKbDECXYEDw7H+BBHUU3t+n7K6af6VTcAAAxwDojkeT/YrU61026ze82VcXFJoLsja6JAwO/PHOD9VacZhG0eREVUiIiAiIgIiICIiAiIgIiICIiAiIBJhByATwCeycNy3nIK7hroHpB7Gcccr1oMbUuGscz0yST7c+ytpDc6DaUi15BL3PMN3YbAyHd+P2P3UxsNCr1G03ltIS1pJqgtDZIHjJ9hM5PsovpLm0L6mXBrWNhrjtwMZ+8CFaNai+20unZua4vuHhzatMu2tgiBPY/mP6+MWzwmvW/Zj+TT27aFs8UKFOs64Doc/luD/ALQczJ5Xd2oW1SnTpXtOlNQQawBJYIMGBz/naZyq1o6iwCuKlKkyG7KjsNIkwGk8Znjv7rX3dm+3vCKtKpSe0fleO4xMEcTK7OBR9izX6ZXZ9EIL1dpLab339q1govqOa5ocJkR6tvIBke0zHgRhXHr/AE/d2eoXematS+Rdtn5tN7gclu6ZBjMzPGVUN3RNvdVaLuWOLU5/FimYzx8SU2dXaXkiIvPbCIiAiIgIiICIiAiIgIiIC7MG57RBMmIHJXVcty4T/MIPVwncHEggieOe/wDCzdOYxrnOqGo8BsNAIAnE+cT+qwW/lBIEA8wCBjvCzrBu2mQcZPH0W1Uby7q5eG5tHOe3aGmCDIAxyOysjo7U2avVdZ6xcva6nbto2BbQdVc6pua1jSGiSNu4YMztjghV7QcKgp7/AEQA3c1oA2iBMAcxE5zyc5Mm0C/trG5q1xQDmbHCm10Oj1DGfLZafYlexHGxtr6Zhy/JOOW9t/c0r3W9T01xtqQq3DW07eq5oY17AQwEnDS3c05juQcAAdupNIvNC1arpmruH4i2dtAa7c0sI3As49JmYxE8AytjZ9VB/S7NKbp1kK8x+Jc0ucWb3VNgJPoaHbSGD04JPJmTHQavUFpZaxq9RlXUNofc/hXMdWrM2N+WwNbhtT5bXES08ZMkNbvjZZxMYysj8YjUa8/3/fasxFk9p7yri7rV7+vXr16ta5quO59Wq4uc73JJJJwf0VZ9aW4t9eqDu9jHkeJH9oV1apStvmPp0bA0aOyWNrEmowxG4kBuTO6AI45iVS3XDfl9TXdHcHiltYHDg+kH/tcfO51fKoiIjUxPhrVTlXlv00KIi8Z0iIiAiIgIiICIiAiIgIiICAkGRgoiD1HqY1zdgLMcwTnn9wsywcfl7SIA4/z9/uteDAI7FZliS6rUcYG7yYHP/v7j3WteXTlEqzG4bmlcFjHtDCCDEuBgE/TP2x28hSLQLO6v6jaX9EHxkfYefCh1u59e4p0n1dzfQCSPWD9xOSAMRyO8q5/h5ZWzba3c+3Bc0OwPT2acd5AJGIgQey2+7djO4nSvxYTHhrbOk63qbaltTuGvYWNc6S3ONzSDkg+f5Uv07UL6lo91Y6NZuZBNWuKby8uYYgtBGGt2wZ/5d1Oeo9NZedKlzqJdXp0HXbNhaA2o2nvdEgOywiQTH5SAJVX9KV31buvdXDXfKpUy5rSQBMHvOABJP0yvRs5UcrjZZWdtf3z+mONc12RGPtxqz36bY/6lqYcaFOlvZ82pJeGgNYBM4iGgcRxgQaAuaz7m5q16pmpVeXuPkkyVMviX1hU6ivRbUHuNjbmGS6d0YHGD9e6hK8SY06hERQCIiAiIgIiICIiAiIgIiICIiAve1ILarDPqAgDmZAx5wTheC5a4tcHN5BkIN3pVy03tOlcsIdwCMgNgnEzJPbtlfQPw6sbd1jTp3G0FzXNaxz2w8kHOe4JcBngZBK+cKN3SFZlWqx5eIDi05IgA58kbvvHvNv8AS3xA0DSqFM6hVdWDWtqOptpFzqhEGMYaZY2MiDE+07F9dV6jp/SnRWp6vqVR8uY4Pty5pPzCzbSa0eSCDIHGDiV8h9S9c6rrNq6xpVHWWlGB+FouADwIw8tAD8ycjkrbfFb4m6j17csovpi10mhUNSjbjlzo2h7+0xgAYAxnlV8m58AiIoBERAREQEREBERAREQEREBERAREQEREBERAREQEREBERAREQEREBERB/9k=
Base64>e_23,DECODE,e_23
WriteLn>%TEMP_DIR%earth\earth_23.jpg,result,e_23
Let>e_24=/9j/4AAQSkZJRgABAQAAAQABAAD/2wBDAAYEBQYFBAYGBQYHBwYIChAKCgkJChQODwwQFxQYGBcUFhYaHSUfGhsjHBYWICwgIyYnKSopGR8tMC0oMCUoKSj/2wBDAQcHBwoIChMKChMoGhYaKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCj/wAARCABVALQDASIAAhEBAxEB/8QAHAABAAIDAQEBAAAAAAAAAAAAAAUGAQQIBwMC/8QAMhAAAQQBAwEGBAUFAQAAAAAAAQACAxEEBRIhMQYTIkFRYQcUcYEVMpGh8BYjQrHh0f/EABoBAQADAQEBAAAAAAAAAAAAAAABAgMFBAb/xAAlEQEAAgIBAgUFAAAAAAAAAAAAAQIDEQQSFBMhMUGBBSIjYfH/2gAMAwEAAhEDEQA/AOW0REQIiICIiAiIgIiztO4B3huuT6HzQYRbWLHIRI1sTX+e4ltAt9zxXItTWBp/zBZLKHjHLtwEfAHiceDQ8nCvc/ZBW0Vz/AsKVjRtcCaA28USPM37eh9fZRer9nJsRve44e+LnhwsgjqARw79laazCNoBERVSIiICIiAiIgIiICIiAiIgIiICIiDIBPQE+SyCW0QKdYId5j6fzyWeQK2362PTqvpFGZJQwgUebA8r6/p/OVOkJfQsKJwdkNcXPYXBgcK3D1A+ln9fRXnTsODMl24tbXWT1OzjcRQHp1r0VNx4GulN0AwBpocE1St/ZCRrcxmLIOJn1HvBducTw01ybND+UvR21ujrhXrjek0/RnYLIsjLhjfESBHGwncXWbF9AOLsXfvzWtLkTwAyd26Jx3Esd4uaPX7Hr9x7XDtBB8xn48cYDp4sUxvDhUZoCjx6kOHF9B9FXMrDh7x+NA1rp3+Bg7y65LaJ6X9fTpyqYfyWiuvdNvtjbzHtTpsbXuzMVmwPpz2XYvzI+9/qq2vXJdGZkaNmTPmjDYnxxdwXHfIXh/IHmBt5PlYXlmpYww9QycZsjZWwyOYJGggPANBwsA0evIB9l6/qHFjBbdfSWWHJ1R5tZERc5uIiICIiAiIgIiICIiAiIgLLSAeRYWFlvLhf+6QfV45c1xPB5I+9/fhbGCwguJcTXA54r1H6LWa6qsgHpdD09vr/AClJ6S+OFn92ESUehNDy9FtijdlbeiwaX3PyUkkjwZQdrIWg+f8Al6eXv/7t40rnFpcOG+fmVoYzWubb3MaeSCBwfagPp7e/RThym5UnfGGGLcGtMcTdjCAALoVRJF/Vd3jY6x7PHktK/wCia/8AiONqOTqsuVHrDHRzY2RE2vEAd5cRVHhrr9d3sF9NJ7Napquvx6dqWVHhSSNaz5hxaWyOkDpo2ue0+IuoVZLqqvyhqruhatNpE08sIjPfR91JHJG2Rrm72uApwIPLQenl70rB/VmXmabpGmRSwaYzBcGxTxMAEYPd26wNwO5rnEi3Hcfe9eyyYr2tx41E6+Pj+nixaIi/npVJ8eRk0sOzdJE4tfsdvFjjr0PnzdLzPtfG1muTFt+JrXH06eX6LpjtdjYkOkNycRuCWaj3T3S0/eQxgaSzeOAXMeXW4kh0fWzfNnbrIdk9p8t73FxAaNx8/CDf7rl87n9xXw5rrTbFh6J3tAIiLlvQIiICIiAiIgIiICIiAiIgL648Rkf+baByXV08/wDQJ+y+S3IA6EvLXu2Ebg5oNnwuI6dOlH789UG5pGBFnOLBNywEOAsA3dEevXoB/wBuuV8P85mHJkaX3mUI+sJAMjvCCS2uHevHW+LWv2CbCWCbumgOkpoIABAHJP6XRu/UrpHsm6LGwsTLkgjMbSHObE8Cmvvhwq7JIFg14XeyvS81ncExEuV8SwyiOvP0Uthv2tYaBLeaV5+KXYuTSviBnRaZG18D9uWIGDlu8WRtuvzB/Q/twqXmYeRp5Y7IxJYGOseI3ZB5P8913+Jya208WTHMJZhsAkVfqpvR3T45nLY4THkRbHd40OFFzTxzweBz/BD6fhZX4aM521uM14aHkh3PPFDny9OnkpGZ2otZHE/HDBLH3jXtB2llE232oH6ALo5OTWa9MTH7Y1xzvac1U7tDk1bNzMSKDFhdviYzaWUKAa0UOTsHX/IDrdc6ZErp55JpK3yOL3V6k2rh2+7R/Ntj0bBlY7Bxj/dkidbZ5ebIPQtBJA63XUiiqWvkc01nJa1fSZdGsarESIiLJYREQEREBERAREQEREBERAW82QOiY2V4IdTaaQOKaOeeK2jr5jzB40V+4n7HEkW0inD1CD1b4cRwsMLXbg4xybdlmhQvi76vNDrz9j0Z2Vxfl3fMMlk+cc9scoab2tDtzasgbaHQ1RPuVyd2U7UYWlGsiGR0bCD4eHOHHHmKFcA/c82LX2r+N2rZ+mP0/Q2yYLHtDDk7g2UNoWAG8A2OHXY6ijyiWx8b+1eDl/FSaLBeHQaSyPBhnafNnLvEOeHlwv29FH6j2k0/V4455syNksTQzuZJbFDqQb6/9XlCK9Mk0ncKzES9Jf2q03CdHUr59pG6OEH9iaHsqzrXa/VNTwxhCeSDTx0ga8m/UE+hJJrgHi7oKuIr5M98nlKIrECIixWEREBERAREQEREBERAREQEREBERAREQEREBERAREQEREBERAREQEREH//Z
Base64>e_24,DECODE,e_24
WriteLn>%TEMP_DIR%earth\earth_24.jpg,result,e_24
END>CreateJPGs
Top
User avatar
jpuziano
Automation Wizard
Posts: 1085
Joined: Sat Oct 30, 2004 12:00 am

Post by jpuziano » Thu Aug 30, 2007 11:15 pm

Very slick, thanks Marcus... and thanks JRL for the great example. :D
jpuziano

Note: If anyone else on the planet would find the following useful...
[Open] PlayWav command that plays from embedded script data
...then please add your thoughts/support at the above post - :-)
Top
edauthier
Pro Scripter
Posts: 84
Joined: Sun Apr 13, 2003 1:26 pm
Location: USA

Post by edauthier » Fri Aug 31, 2007 3:33 am

Wow.. Thanks for the example. I decided to compile it for testing and it works perfectly. T

his is a very nice enhancement with a lot of possibilities.
Thanks again for sharing. It's nice to start with a script you can examine.

Ed
Top
User avatar
Bob Hansen
Automation Wizard
Posts: 2475
Joined: Tue Sep 24, 2002 3:47 am
Location: Salem, New Hampshire, US
Contact:
Contact Bob Hansen

Post by Bob Hansen » Fri Aug 31, 2007 4:03 am

Thanks for that Dick.

A great example showing some good techniques that we all can learn from.

Don't know where you find the time to do this stuff! This has just been moved into my toolbox for reference.

Thanks again....
Hope this was helpful..................good luck,
Bob
A humble man and PROUD of it!
Top
Post Reply

Return to “General Discussion”

Sign up to our newsletter for free automation tips, tricks & discounts