Home » Personal collection » Commodore disks » disk50a2_progs1.d64 » globe

globe

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Personal collection » Commodore disks » disk50a2_progs1.d64
Filename: globe
Read OK:
File size: 0A33 bytes
Load address: 0801
Exec address: 0000
File contents
    10 REM PROGRAM GLOBE
    20 REM VERSION B1.0
    30 REM AUTHOR M. TOULMONDE
    40 REM BEEBUG JAN/FEB 1986
    50 REM COPYRIGHT
    60 REM CONVERTED BY D. FORD
    70 :
   100 K=0.95:GOSUB 1000:REM INPUT
   110 GOSUB 1180:REM GLOBE
   120 IF P<>0 THEN GOSUB 1380:REM LINES
   130 GOSUB 1500:REM CONTS
   140 GET A$:IF A$="" THEN 140
   150 GOSUB 2500:REM GRAPH OFF
   160 GOTO 70
   170 :
  1000 REM INPUT
  1005 PRINT"<clr><white>";:POKE53280,0:POKE53281,0
  1010 POKE211,15:POKE214,2:SYS 58732:PRINT"🭶 ♠ 🭻 🭰 🭴":PRINTCHR$(14)
  1020 PRINT"   🭰HIS PROGRAM DRAWS A PICTURE OF THE"
  1022 PRINT"🭶ARTH AS IT WOULD BE SEEN IF WE WERE"
  1024 PRINT"IN SPACE.":PRINT
  1030 PRINT"♠ MAGNIFICATION OF 1 GIVES A COMPLETE"
  1032 PRINT"REPRESENTATION OF THE GLOBE":PRINT
  1040 INPUT"╲AGNIFICATION";R:PRINT
  1050 R=500*ABS(R):IF R=0 THEN R=500
  1060 PRINT"🭱IVE THE POSITIONS OF THE POINT LOCATED"
  1062 PRINT"AT THE VERTICAL OF WHICHEVER COUNTRY"
  1064 PRINT"OR PART OF THE EARTH YOU WISH TO SEE:":PRINT
  1070 INPUT"🭼ATITUDE (-90 TO 90)";LA
  1080 IF ABS(LA)>90 THEN 1070
  1090 INPUT"🭼ONGITUDE (-180 TO 180";LO
  1100 LO=-LO:IF ABS(LO)>180 THEN 1090
  1110 PRINT:PRINT"╲ERIDIAN AND PARALLEL LINES (🭵/╱) ? ";
  1120 GET R$:IF R$<>"Y" AND R$<>"N" THEN 1120
  1125 PRINT R$
  1130 IF R$="N" THEN P=0:RETURN
  1140 INPUT"♠NGLE STEP (EG 15/30/45/90)";P
  1150 IF P<1 THEN P=90
  1160 RETURN
  1170 :
  1180 REM GLOBE
  1200 GOSUB 2000
  1230 G=π/180:S=SIN(LA*G):C=COS(LA*G)
  1240 IF R>850 THEN T=0:GOTO 1340
  1250 CL=0:XX%=R:YY%=0
  1270 FOR I=0 TO 360 STEP 12
  1280 X%=R*COS(I*G):Y%=K*R*SIN(I*G)
  1290 CL=1:X1=XX%:Y1=YY%:X2=X%:Y2=Y%:GOSUB 3000
  1320 XX%=X%:YY%=Y%
  1330 NEXT:T=0
  1340 RETURN
  1370 :
  1380 REM LINES
  1390 CL=1
  1400 FOR L=0 TO 180-P STEP P
  1410 FORF=90TO450STEP12:FC=F:LC=L:GOSUB1640:NEXT
  1420 T=0:NEXT L
  1430 FORL=0TO360STEP12:FC=66.5:LC=L:GOSUB1640:NEXT
  1440 FORL=0TO360STEP12:FC=-66.5:LC=L:GOSUB1640:NEXT
  1450 FORL=0TO360STEP12:FC=23.5:LC=L:GOSUB1640:NEXT
  1460 FORL=0TO360STEP12:FC=-23.5:LC=L:GOSUB1640:NEXT
  1470 FORL=0TO360STEP12:FC=0:LC=L:GOSUB1640:NEXT
  1480 RETURN
  1490 :
  1630 :
  1640 REM C
  1650 D=(LC-LO)*G:Q=SIN(D):M=COS(D)
  1660 U=COS(FC*G):V=SIN(FC*G)
  1670 X%=R*U*Q:Y%=R*(V*C-U*M*S)*K
  1680 IF T=0 THEN X1=X%:Y1=Y%:GOTO 1710
  1690 Z=V*S+U*M*C
  1700 IF Z<0 THEN X1=X%:Y1=Y%:GOTO 1710
  1705 X2=X%:Y2=Y%:GOSUB 3000
  1710 T=1:RETURN
  2000 REM HIRES ON!
  2010 POKE 53272,(PEEK(53272)AND15)OR16
  2020 POKE 56578,PEEK(56578)OR3
  2030 POKE 56576,(PEEK(56576)AND252)OR3
  2040 POKE 53272,(PEEK(53272)AND241)OR8
  2050 POKE 53265,PEEK(53265)OR32
  2060 FOR J=$400 TO $07F0
  2070 POKEJ,86:NEXT
  2080 FORJ=$2000 TO $4000:POKEJ,0:NEXT
  2090 RETURN
  2500 REM HIRES OFF!
  2510 POKE 53265,PEEK(53265) AND 223
  2520 POKE 53272,(PEEK(53272)AND240)OR4
  2530 RETURN
  3000 REM DRAW LINE!
  3010 XA=(X1+640)/5:XB=(X2+640)/5
  3020 YA=(512-Y1)/6:YB=(512-Y2)/6
  3030 IF XA<>XB THEN MP=(YB-YA)/(XB-XA):CP=YA-MP*XA
  3040 IF ABS(XB-XA)<ABS(YB-YA) THEN 3120
  3050 IF XA=XB THEN RETURN
  3060 FOR X3=XA TO XB STEP 2*SGN(XB-XA)
  3070 Y3=MP*X3+CP
  3080 GOSUB 3500:REM PLOT
  3090 NEXT:X1=X2:Y1=Y2
  3100 RETURN
  3110 :
  3120 FOR Y3=YA TO YB STEP SGN(YB-YA)
  3130 X3=XA:IF XA<>XB THEN X3=(Y3-CP)/MP
  3140 GOSUB 3500:REM PLOT
  3150 NEXT:X1=X2:Y1=Y2
  3160 RETURN
  3500 CH=INT(X3/8):RO=INT(Y3/8):LN=Y3 AND 7
  3510 BY=8192+RO*320+8*CH+LN:BI=7-(X3 AND 7)
  3520 IF (CL AND 1)=1 THEN POKE BY,PEEK(BY) OR (2^BI):RETURN
  3530 POKE BY,PEEK(BY) AND (255-(2^BI)):RETURN


� PROGRAM GLOBE(� VERSION B1.0B� AUTHOR M. TOULMONDE\(� BEEBUG JAN/FEB 1986l2� COPYRIGHT�<� CONVERTED BY D. FORD�F:�dK�0.95:� 1000:� INPUT�n� 1180:� GLOBE�x� P��0 � � 1380:� LINES��� 1500:� CONTS	�� A$:� A$�"" � 140	�� 2500:� GRAPH OFF 	�� 70&	�:2	�� INPUTO	��"�";:�53280,0:�53281,0~	��211,15:�214,2:� 58732:�"� � � � �":��(14)�	��"   �HIS PROGRAM DRAWS A PICTURE OF THE"�	��"�ARTH AS IT WOULD BE SEEN IF WE WERE"�	�"IN SPACE.":�
�"� MAGNIFICATION OF 1 GIVES A COMPLETE"=
�"REPRESENTATION OF THE GLOBE":�V
�"�AGNIFICATION";R:�s
R�500��(R):� R�0 � R�500�
$�"�IVE THE POSITIONS OF THE POINT LOCATED"�
&�"AT THE VERTICAL OF WHICHEVER COUNTRY"�
(�"OR PART OF THE EARTH YOU WISH TO SEE:":�.�"�ATITUDE (-90 TO 90)";LA28� �(LA)�90 � 1070SB�"�ONGITUDE (-180 TO 180";LOqLLO��LO:� �(LO)�180 � 1090�V�:�"�ERIDIAN AND PARALLEL LINES (�/�) ? ";�`� R$:� R$��"Y" � R$��"N" � 1120�e� R$�j� R$�"N" � P�0:�t�"�NGLE STEP (EG 15/30/45/90)";P~� P�1 � P�90��$�:0�� GLOBE;�� 2000[�G���180:S��(LA�G):C��(LA�G)t�� R�850 � T�0:� 1340��CL�0:XX%�R:YY%�0��� I�0 � 360 � 12�X%�R��(I�G):Y%�K�R��(I�G)�
CL�1:X1�XX%:Y1�YY%:X2�X%:Y2�Y%:� 3000�(XX%�X%:YY%�Y%
2�:T�0
<�
Z:
d� LINES#
nCL�19
x� L�0 � 180�P � P\
��F�90�450�12:FC�F:LC�L:�1640:�h
�T�0:� L�
��L�0�360�12:FC�66.5:LC�L:�1640:��
��L�0�360�12:FC��66.5:LC�L:�1640:��
��L�0�360�12:FC�23.5:LC�L:�1640:��
��L�0�360�12:FC��23.5:LC�L:�1640:� ��L�0�360�12:FC�0:LC�L:�1640:�&��,�:2^::h� CXrD�(LC�LO)�G:Q��(D):M��(D)p|U��(FC�G):V��(FC�G)��X%�R�U�Q:Y%�R�(V�C�U�M�S)�K��� T�0 � X1�X%:Y1�Y%:� 1710��Z�V�S�U�M�C��� Z�0 � X1�X%:Y1�Y%:� 1710��X2�X%:Y2�Y%:� 3000��T�1:��� HIRES ON!,�� 53272,(�(53272)�15)�16C�� 56578,�(56578)�3`�� 56576,(�(56576)�252)�3}�� 53272,(�(53272)�241)�8�� 53265,�(53265)�32�� J�$400 � $07F0��J,86:�� �J�$2000 � $4000:�J,0:��*���	� HIRES OFF!�	� 53265,�(53265) � 223!�	� 53272,(�(53272)�240)�4'�	�8�� DRAW LINE!X�XA�(X1�640)�5:XB�(X2�640)�5x�YA�(512�Y1)�6:YB�(512�Y2)�6��� XA��XB � MP�(YB�YA)�(XB�XA):CP�YA�MP�XA��� �(XB�XA)��(YB�YA) � 3120��� XA�XB � ���� X3�XA � XB � 2��(XB�XA)�Y3�MP�X3�CP� 3500:� PLOT'�:X1�X2:Y1�Y2-�3&:O0� Y3�YA � YB � �(YB�YA)r:X3�XA:� XA��XB � X3�(Y3�CP)�MP�D� 3500:� PLOT�N�:X1�X2:Y1�Y2�X���
CH��(X3�8):RO��(Y3�8):LN�Y3 � 7��
BY�8192�RO�320�8�CH�LN:BI�7�(X3 � 7)�
� (CL � 1)�1 � � BY,�(BY) � (2�BI):�2�
� BY,�(BY) � (255�(2�BI)):�
UHJ@. program globe@(HT@. version b1.0@bH.@. author m. toulmonde@£H(@. beebug jan/feb 1986@LH2@. copyright@.H<@. converted by d. ford@.Hf@:@.HD@k.0.95:. 1000:. input@.HN@. 1180:. globe@.HX@. p..0 . . 1380:. lines@.H.@. 1500:. conts@@I.@. a$:. a$."" . 140@WI.@. 2500:. graph off@ I.@. 70@&I.@:@2I.C. input@oI.C.".E";:.53280,0:.53281,0@.I.C.211,15:.214,2:. 58732:.". . . . .":..(14)@.I.C."   .his program draws a picture of the"@.I.C.".arth as it would be seen if we were"@.I@D."in space.":.@XJFD.". magnification of 1 gives a complete"@=JHD."representation of the globe":.@vJPD.".agnification";r:.@SJZDr.500..(r):. r.0 . r.500@.J$D.".ive the positions of the point located"@.J&D."at the vertical of whichever country"@.J(D."or part of the earth you wish to see:":.@£K.D.".atitude (-90 to 90)";la@2K8D. .(la).90 . 1070@sKbD.".ongitude (-180 to 180";lo@QKlDlo..lo:. .(lo).180 . 1090@.KvD.:.".eridian and parallel lines (./.) ? ";@.K.D. r$:. r$.."y" . r$.."n" . 1120@.KED. r$@.KJD. r$."n" . p.0:.@GLTD.".ngle step (eg 15/30/45/90)";p@XL.D. p.1 . p.90@.L.D.@$L.D:@0L.D. globe@;L.D. 2000@[L.Dg...180:s..(la.g):c..(la.g)@TL.D. r.850 . t.0:. 1340@.L.Dcl.0:xx%.r:yy%.0@.L.D. i.0 . 360 . 12@.L@Ex%.r..(i.g):y%.k.r..(i.g)@.LJEcl.1:x1.xx%:y1.yy%:x2.x%:y2.y%:. 3000@.L(Exx%.x%:yy%.y%@BM2E.:t.0@HM<E.@NMzE:@ZMDE. lines@#MNEcl.1@9MXE. l.0 . 180.p . p@£M.E.f.90.450.12:fc.f:lc.l:.1640:.@HM.Et.0:. l@.M.E.l.0.360.12:fc.66.5:lc.l:.1640:.@.M.E.l.0.360.12:fc..66.5:lc.l:.1640:.@.M.E.l.0.360.12:fc.23.5:lc.l:.1640:.@.M.E.l.0.360.12:fc..23.5:lc.l:.1640:.@ N.E.l.0.360.12:fc.0:lc.l:.1640:.@&N.E.@,N.E:@2N.F:@:NHF. c@xNRFd.(lc.lo).g:q..(d):m..(d)@PN.Fu..(fc.g):v..(fc.g)@.N.Fx%.r.u.q:y%.r.(v.c.u.m.s).k@.N.F. t.0 . x1.x%:y1.y%:. 1710@.N.Fz.v.s.u.m.c@.N.F. z.0 . x1.x%:y1.y%:. 1710@.N.Fx2.x%:y2.y%:. 3000@.N.Ft.1:.@OO.G. hires on!@,O.G. 53272,(.(53272).15).16@cO.G. 56578,.(56578).3@.O.G. 56576,(.(56576).252).3@.O.G. 53272,(.(53272).241).8@.OBH. 53265,.(53265).32@.OLH. j.$400 . $07f0@.OVH.j,86:.@.O H.j.$2000 . $4000:.j,0:.@.O*H.@.O.I. hires off!@DP.I. 53265,.(53265) . 223@!P.I. 53272,(.(53272).240).4@'P.I.@8P.K. draw line!@xP.Kxa.(x1.640).5:xb.(x2.640).5@XP.Kya.(512.y1).6:yb.(512.y2).6@.P.K. xa..xb . mp.(yb.ya).(xb.xa):cp.ya.mp.xa@.P.K. .(xb.xa)..(yb.ya) . 3120@.P.K. xa.xb . .@.P.K. x3.xa . xb . 2..(xb.xa)@CQ.Ky3.mp.x3.cp@UQHL. 3500:. plot@'QRL.:x1.x2:y1.y2@-Q£L.@3Q&L:@oQ0L. y3.ya . yb . .(yb.ya)@RQ:Lx3.xa:. xa..xb . x3.(y3.cp).mp@.QdL. 3500:. plot@.QnL.:x1.x2:y1.y2@.QxL.@.Q.Mch..(x3.8):ro..(y3.8):ln.y3 . 7@.Q.Mby.8192.ro.320.8.ch.ln:bi.7.(x3 . 7)@RR.M. (cl . 1).1 . . by,.(by) . (2.bi):.@2R.M. by,.(by) . (255.(2.bi)):.@@@
00000000  15 08 0a 00 8f 20 50 52  4f 47 52 41 4d 20 47 4c  |..... PROGRAM GL|
00000010  4f 42 45 00 28 08 14 00  8f 20 56 45 52 53 49 4f  |OBE.(.... VERSIO|
00000020  4e 20 42 31 2e 30 00 42  08 1e 00 8f 20 41 55 54  |N B1.0.B.... AUT|
00000030  48 4f 52 20 4d 2e 20 54  4f 55 4c 4d 4f 4e 44 45  |HOR M. TOULMONDE|
00000040  00 5c 08 28 00 8f 20 42  45 45 42 55 47 20 4a 41  |.\.(.. BEEBUG JA|
00000050  4e 2f 46 45 42 20 31 39  38 36 00 6c 08 32 00 8f  |N/FEB 1986.l.2..|
00000060  20 43 4f 50 59 52 49 47  48 54 00 87 08 3c 00 8f  | COPYRIGHT...<..|
00000070  20 43 4f 4e 56 45 52 54  45 44 20 42 59 20 44 2e  | CONVERTED BY D.|
00000080  20 46 4f 52 44 00 8d 08  46 00 3a 00 a7 08 64 00  | FORD...F.:...d.|
00000090  4b b2 30 2e 39 35 3a 8d  20 31 30 30 30 3a 8f 20  |K.0.95:. 1000:. |
000000a0  49 4e 50 55 54 00 ba 08  6e 00 8d 20 31 31 38 30  |INPUT...n.. 1180|
000000b0  3a 8f 20 47 4c 4f 42 45  00 d6 08 78 00 8b 20 50  |:. GLOBE...x.. P|
000000c0  b3 b1 30 20 a7 20 8d 20  31 33 38 30 3a 8f 20 4c  |..0 . . 1380:. L|
000000d0  49 4e 45 53 00 e9 08 82  00 8d 20 31 35 30 30 3a  |INES...... 1500:|
000000e0  8f 20 43 4f 4e 54 53 00  00 09 8c 00 a1 20 41 24  |. CONTS...... A$|
000000f0  3a 8b 20 41 24 b2 22 22  20 a7 20 31 34 30 00 17  |:. A$."" . 140..|
00000100  09 96 00 8d 20 32 35 30  30 3a 8f 20 47 52 41 50  |.... 2500:. GRAP|
00000110  48 20 4f 46 46 00 20 09  a0 00 89 20 37 30 00 26  |H OFF. .... 70.&|
00000120  09 aa 00 3a 00 32 09 e8  03 8f 20 49 4e 50 55 54  |...:.2.... INPUT|
00000130  00 4f 09 ed 03 99 22 93  05 22 3b 3a 97 35 33 32  |.O...."..";:.532|
00000140  38 30 2c 30 3a 97 35 33  32 38 31 2c 30 00 7e 09  |80,0:.53281,0.~.|
00000150  f2 03 97 32 31 31 2c 31  35 3a 97 32 31 34 2c 32  |...211,15:.214,2|
00000160  3a 9e 20 35 38 37 33 32  3a 99 22 c5 20 c1 20 d2  |:. 58732:.". . .|
00000170  20 d4 20 c8 22 3a 99 c7  28 31 34 29 00 ac 09 fc  | . .":..(14)....|
00000180  03 99 22 20 20 20 d4 48  49 53 20 50 52 4f 47 52  |.."   .HIS PROGR|
00000190  41 4d 20 44 52 41 57 53  20 41 20 50 49 43 54 55  |AM DRAWS A PICTU|
000001a0  52 45 20 4f 46 20 54 48  45 22 00 d8 09 fe 03 99  |RE OF THE"......|
000001b0  22 c5 41 52 54 48 20 41  53 20 49 54 20 57 4f 55  |".ARTH AS IT WOU|
000001c0  4c 44 20 42 45 20 53 45  45 4e 20 49 46 20 57 45  |LD BE SEEN IF WE|
000001d0  20 57 45 52 45 22 00 eb  09 00 04 99 22 49 4e 20  | WERE"......"IN |
000001e0  53 50 41 43 45 2e 22 3a  99 00 18 0a 06 04 99 22  |SPACE.":......."|
000001f0  c1 20 4d 41 47 4e 49 46  49 43 41 54 49 4f 4e 20  |. MAGNIFICATION |
00000200  4f 46 20 31 20 47 49 56  45 53 20 41 20 43 4f 4d  |OF 1 GIVES A COM|
00000210  50 4c 45 54 45 22 00 3d  0a 08 04 99 22 52 45 50  |PLETE".=...."REP|
00000220  52 45 53 45 4e 54 41 54  49 4f 4e 20 4f 46 20 54  |RESENTATION OF T|
00000230  48 45 20 47 4c 4f 42 45  22 3a 99 00 56 0a 10 04  |HE GLOBE":..V...|
00000240  85 22 cd 41 47 4e 49 46  49 43 41 54 49 4f 4e 22  |.".AGNIFICATION"|
00000250  3b 52 3a 99 00 73 0a 1a  04 52 b2 35 30 30 ac b6  |;R:..s...R.500..|
00000260  28 52 29 3a 8b 20 52 b2  30 20 a7 20 52 b2 35 30  |(R):. R.0 . R.50|
00000270  30 00 a2 0a 24 04 99 22  c7 49 56 45 20 54 48 45  |0...$..".IVE THE|
00000280  20 50 4f 53 49 54 49 4f  4e 53 20 4f 46 20 54 48  | POSITIONS OF TH|
00000290  45 20 50 4f 49 4e 54 20  4c 4f 43 41 54 45 44 22  |E POINT LOCATED"|
000002a0  00 ce 0a 26 04 99 22 41  54 20 54 48 45 20 56 45  |...&.."AT THE VE|
000002b0  52 54 49 43 41 4c 20 4f  46 20 57 48 49 43 48 45  |RTICAL OF WHICHE|
000002c0  56 45 52 20 43 4f 55 4e  54 52 59 22 00 fd 0a 28  |VER COUNTRY"...(|
000002d0  04 99 22 4f 52 20 50 41  52 54 20 4f 46 20 54 48  |.."OR PART OF TH|
000002e0  45 20 45 41 52 54 48 20  59 4f 55 20 57 49 53 48  |E EARTH YOU WISH|
000002f0  20 54 4f 20 53 45 45 3a  22 3a 99 00 1c 0b 2e 04  | TO SEE:":......|
00000300  85 22 cc 41 54 49 54 55  44 45 20 28 2d 39 30 20  |.".ATITUDE (-90 |
00000310  54 4f 20 39 30 29 22 3b  4c 41 00 32 0b 38 04 8b  |TO 90)";LA.2.8..|
00000320  20 b6 28 4c 41 29 b1 39  30 20 a7 20 31 30 37 30  | .(LA).90 . 1070|
00000330  00 53 0b 42 04 85 22 cc  4f 4e 47 49 54 55 44 45  |.S.B..".ONGITUDE|
00000340  20 28 2d 31 38 30 20 54  4f 20 31 38 30 22 3b 4c  | (-180 TO 180";L|
00000350  4f 00 71 0b 4c 04 4c 4f  b2 ab 4c 4f 3a 8b 20 b6  |O.q.L.LO..LO:. .|
00000360  28 4c 4f 29 b1 31 38 30  20 a7 20 31 30 39 30 00  |(LO).180 . 1090.|
00000370  a0 0b 56 04 99 3a 99 22  cd 45 52 49 44 49 41 4e  |..V..:.".ERIDIAN|
00000380  20 41 4e 44 20 50 41 52  41 4c 4c 45 4c 20 4c 49  | AND PARALLEL LI|
00000390  4e 45 53 20 28 d9 2f ce  29 20 3f 20 22 3b 00 c4  |NES (./.) ? ";..|
000003a0  0b 60 04 a1 20 52 24 3a  8b 20 52 24 b3 b1 22 59  |.`.. R$:. R$.."Y|
000003b0  22 20 af 20 52 24 b3 b1  22 4e 22 20 a7 20 31 31  |" . R$.."N" . 11|
000003c0  32 30 00 cd 0b 65 04 99  20 52 24 00 e2 0b 6a 04  |20...e.. R$...j.|
000003d0  8b 20 52 24 b2 22 4e 22  20 a7 20 50 b2 30 3a 8e  |. R$."N" . P.0:.|
000003e0  00 07 0c 74 04 85 22 c1  4e 47 4c 45 20 53 54 45  |...t..".NGLE STE|
000003f0  50 20 28 45 47 20 31 35  2f 33 30 2f 34 35 2f 39  |P (EG 15/30/45/9|
00000400  30 29 22 3b 50 00 18 0c  7e 04 8b 20 50 b3 31 20  |0)";P...~.. P.1 |
00000410  a7 20 50 b2 39 30 00 1e  0c 88 04 8e 00 24 0c 92  |. P.90.......$..|
00000420  04 3a 00 30 0c 9c 04 8f  20 47 4c 4f 42 45 00 3b  |.:.0.... GLOBE.;|
00000430  0c b0 04 8d 20 32 30 30  30 00 5b 0c ce 04 47 b2  |.... 2000.[...G.|
00000440  ff ad 31 38 30 3a 53 b2  bf 28 4c 41 ac 47 29 3a  |..180:S..(LA.G):|
00000450  43 b2 be 28 4c 41 ac 47  29 00 74 0c d8 04 8b 20  |C..(LA.G).t.... |
00000460  52 b1 38 35 30 20 a7 20  54 b2 30 3a 89 20 31 33  |R.850 . T.0:. 13|
00000470  34 30 00 89 0c e2 04 43  4c b2 30 3a 58 58 25 b2  |40.....CL.0:XX%.|
00000480  52 3a 59 59 25 b2 30 00  9e 0c f6 04 81 20 49 b2  |R:YY%.0...... I.|
00000490  30 20 a4 20 33 36 30 20  a9 20 31 32 00 bc 0c 00  |0 . 360 . 12....|
000004a0  05 58 25 b2 52 ac be 28  49 ac 47 29 3a 59 25 b2  |.X%.R..(I.G):Y%.|
000004b0  4b ac 52 ac bf 28 49 ac  47 29 00 e6 0c 0a 05 43  |K.R..(I.G).....C|
000004c0  4c b2 31 3a 58 31 b2 58  58 25 3a 59 31 b2 59 59  |L.1:X1.XX%:Y1.YY|
000004d0  25 3a 58 32 b2 58 25 3a  59 32 b2 59 25 3a 8d 20  |%:X2.X%:Y2.Y%:. |
000004e0  33 30 30 30 00 f8 0c 28  05 58 58 25 b2 58 25 3a  |3000...(.XX%.X%:|
000004f0  59 59 25 b2 59 25 00 02  0d 32 05 82 3a 54 b2 30  |YY%.Y%...2..:T.0|
00000500  00 08 0d 3c 05 8e 00 0e  0d 5a 05 3a 00 1a 0d 64  |...<.....Z.:...d|
00000510  05 8f 20 4c 49 4e 45 53  00 23 0d 6e 05 43 4c b2  |.. LINES.#.n.CL.|
00000520  31 00 39 0d 78 05 81 20  4c b2 30 20 a4 20 31 38  |1.9.x.. L.0 . 18|
00000530  30 ab 50 20 a9 20 50 00  5c 0d 82 05 81 46 b2 39  |0.P . P.\....F.9|
00000540  30 a4 34 35 30 a9 31 32  3a 46 43 b2 46 3a 4c 43  |0.450.12:FC.F:LC|
00000550  b2 4c 3a 8d 31 36 34 30  3a 82 00 68 0d 8c 05 54  |.L:.1640:..h...T|
00000560  b2 30 3a 82 20 4c 00 8d  0d 96 05 81 4c b2 30 a4  |.0:. L......L.0.|
00000570  33 36 30 a9 31 32 3a 46  43 b2 36 36 2e 35 3a 4c  |360.12:FC.66.5:L|
00000580  43 b2 4c 3a 8d 31 36 34  30 3a 82 00 b3 0d a0 05  |C.L:.1640:......|
00000590  81 4c b2 30 a4 33 36 30  a9 31 32 3a 46 43 b2 ab  |.L.0.360.12:FC..|
000005a0  36 36 2e 35 3a 4c 43 b2  4c 3a 8d 31 36 34 30 3a  |66.5:LC.L:.1640:|
000005b0  82 00 d8 0d aa 05 81 4c  b2 30 a4 33 36 30 a9 31  |.......L.0.360.1|
000005c0  32 3a 46 43 b2 32 33 2e  35 3a 4c 43 b2 4c 3a 8d  |2:FC.23.5:LC.L:.|
000005d0  31 36 34 30 3a 82 00 fe  0d b4 05 81 4c b2 30 a4  |1640:.......L.0.|
000005e0  33 36 30 a9 31 32 3a 46  43 b2 ab 32 33 2e 35 3a  |360.12:FC..23.5:|
000005f0  4c 43 b2 4c 3a 8d 31 36  34 30 3a 82 00 20 0e be  |LC.L:.1640:.. ..|
00000600  05 81 4c b2 30 a4 33 36  30 a9 31 32 3a 46 43 b2  |..L.0.360.12:FC.|
00000610  30 3a 4c 43 b2 4c 3a 8d  31 36 34 30 3a 82 00 26  |0:LC.L:.1640:..&|
00000620  0e c8 05 8e 00 2c 0e d2  05 3a 00 32 0e 5e 06 3a  |.....,...:.2.^.:|
00000630  00 3a 0e 68 06 8f 20 43  00 58 0e 72 06 44 b2 28  |.:.h.. C.X.r.D.(|
00000640  4c 43 ab 4c 4f 29 ac 47  3a 51 b2 bf 28 44 29 3a  |LC.LO).G:Q..(D):|
00000650  4d b2 be 28 44 29 00 70  0e 7c 06 55 b2 be 28 46  |M..(D).p.|.U..(F|
00000660  43 ac 47 29 3a 56 b2 bf  28 46 43 ac 47 29 00 90  |C.G):V..(FC.G)..|
00000670  0e 86 06 58 25 b2 52 ac  55 ac 51 3a 59 25 b2 52  |...X%.R.U.Q:Y%.R|
00000680  ac 28 56 ac 43 ab 55 ac  4d ac 53 29 ac 4b 00 af  |.(V.C.U.M.S).K..|
00000690  0e 90 06 8b 20 54 b2 30  20 a7 20 58 31 b2 58 25  |.... T.0 . X1.X%|
000006a0  3a 59 31 b2 59 25 3a 89  20 31 37 31 30 00 bf 0e  |:Y1.Y%:. 1710...|
000006b0  9a 06 5a b2 56 ac 53 aa  55 ac 4d ac 43 00 de 0e  |..Z.V.S.U.M.C...|
000006c0  a4 06 8b 20 5a b3 30 20  a7 20 58 31 b2 58 25 3a  |... Z.0 . X1.X%:|
000006d0  59 31 b2 59 25 3a 89 20  31 37 31 30 00 f5 0e a9  |Y1.Y%:. 1710....|
000006e0  06 58 32 b2 58 25 3a 59  32 b2 59 25 3a 8d 20 33  |.X2.X%:Y2.Y%:. 3|
000006f0  30 30 30 00 ff 0e ae 06  54 b2 31 3a 8e 00 0f 0f  |000.....T.1:....|
00000700  d0 07 8f 20 48 49 52 45  53 20 4f 4e 21 00 2c 0f  |... HIRES ON!.,.|
00000710  da 07 97 20 35 33 32 37  32 2c 28 c2 28 35 33 32  |... 53272,(.(532|
00000720  37 32 29 af 31 35 29 b0  31 36 00 43 0f e4 07 97  |72).15).16.C....|
00000730  20 35 36 35 37 38 2c c2  28 35 36 35 37 38 29 b0  | 56578,.(56578).|
00000740  33 00 60 0f ee 07 97 20  35 36 35 37 36 2c 28 c2  |3.`.... 56576,(.|
00000750  28 35 36 35 37 36 29 af  32 35 32 29 b0 33 00 7d  |(56576).252).3.}|
00000760  0f f8 07 97 20 35 33 32  37 32 2c 28 c2 28 35 33  |.... 53272,(.(53|
00000770  32 37 32 29 af 32 34 31  29 b0 38 00 95 0f 02 08  |272).241).8.....|
00000780  97 20 35 33 32 36 35 2c  c2 28 35 33 32 36 35 29  |. 53265,.(53265)|
00000790  b0 33 32 00 aa 0f 0c 08  81 20 4a b2 24 34 30 30  |.32...... J.$400|
000007a0  20 a4 20 24 30 37 46 30  00 b6 0f 16 08 97 4a 2c  | . $07F0......J,|
000007b0  38 36 3a 82 00 d2 0f 20  08 81 4a b2 24 32 30 30  |86:.... ..J.$200|
000007c0  30 20 a4 20 24 34 30 30  30 3a 97 4a 2c 30 3a 82  |0 . $4000:.J,0:.|
000007d0  00 d8 0f 2a 08 8e 00 e9  0f c4 09 8f 20 48 49 52  |...*........ HIR|
000007e0  45 53 20 4f 46 46 21 00  04 10 ce 09 97 20 35 33  |ES OFF!...... 53|
000007f0  32 36 35 2c c2 28 35 33  32 36 35 29 20 af 20 32  |265,.(53265) . 2|
00000800  32 33 00 21 10 d8 09 97  20 35 33 32 37 32 2c 28  |23.!.... 53272,(|
00000810  c2 28 35 33 32 37 32 29  af 32 34 30 29 b0 34 00  |.(53272).240).4.|
00000820  27 10 e2 09 8e 00 38 10  b8 0b 8f 20 44 52 41 57  |'.....8.... DRAW|
00000830  20 4c 49 4e 45 21 00 58  10 c2 0b 58 41 b2 28 58  | LINE!.X...XA.(X|
00000840  31 aa 36 34 30 29 ad 35  3a 58 42 b2 28 58 32 aa  |1.640).5:XB.(X2.|
00000850  36 34 30 29 ad 35 00 78  10 cc 0b 59 41 b2 28 35  |640).5.x...YA.(5|
00000860  31 32 ab 59 31 29 ad 36  3a 59 42 b2 28 35 31 32  |12.Y1).6:YB.(512|
00000870  ab 59 32 29 ad 36 00 a6  10 d6 0b 8b 20 58 41 b3  |.Y2).6...... XA.|
00000880  b1 58 42 20 a7 20 4d 50  b2 28 59 42 ab 59 41 29  |.XB . MP.(YB.YA)|
00000890  ad 28 58 42 ab 58 41 29  3a 43 50 b2 59 41 ab 4d  |.(XB.XA):CP.YA.M|
000008a0  50 ac 58 41 00 c5 10 e0  0b 8b 20 b6 28 58 42 ab  |P.XA...... .(XB.|
000008b0  58 41 29 b3 b6 28 59 42  ab 59 41 29 20 a7 20 33  |XA)..(YB.YA) . 3|
000008c0  31 32 30 00 d5 10 ea 0b  8b 20 58 41 b2 58 42 20  |120...... XA.XB |
000008d0  a7 20 8e 00 f3 10 f4 0b  81 20 58 33 b2 58 41 20  |. ....... X3.XA |
000008e0  a4 20 58 42 20 a9 20 32  ac b4 28 58 42 ab 58 41  |. XB . 2..(XB.XA|
000008f0  29 00 03 11 fe 0b 59 33  b2 4d 50 ac 58 33 aa 43  |).....Y3.MP.X3.C|
00000900  50 00 15 11 08 0c 8d 20  33 35 30 30 3a 8f 20 50  |P...... 3500:. P|
00000910  4c 4f 54 00 27 11 12 0c  82 3a 58 31 b2 58 32 3a  |LOT.'....:X1.X2:|
00000920  59 31 b2 59 32 00 2d 11  1c 0c 8e 00 33 11 26 0c  |Y1.Y2.-.....3.&.|
00000930  3a 00 4f 11 30 0c 81 20  59 33 b2 59 41 20 a4 20  |:.O.0.. Y3.YA . |
00000940  59 42 20 a9 20 b4 28 59  42 ab 59 41 29 00 72 11  |YB . .(YB.YA).r.|
00000950  3a 0c 58 33 b2 58 41 3a  8b 20 58 41 b3 b1 58 42  |:.X3.XA:. XA..XB|
00000960  20 a7 20 58 33 b2 28 59  33 ab 43 50 29 ad 4d 50  | . X3.(Y3.CP).MP|
00000970  00 84 11 44 0c 8d 20 33  35 30 30 3a 8f 20 50 4c  |...D.. 3500:. PL|
00000980  4f 54 00 96 11 4e 0c 82  3a 58 31 b2 58 32 3a 59  |OT...N..:X1.X2:Y|
00000990  31 b2 59 32 00 9c 11 58  0c 8e 00 c0 11 ac 0d 43  |1.Y2...X.......C|
000009a0  48 b2 b5 28 58 33 ad 38  29 3a 52 4f b2 b5 28 59  |H..(X3.8):RO..(Y|
000009b0  33 ad 38 29 3a 4c 4e b2  59 33 20 af 20 37 00 e9  |3.8):LN.Y3 . 7..|
000009c0  11 b6 0d 42 59 b2 38 31  39 32 aa 52 4f ac 33 32  |...BY.8192.RO.32|
000009d0  30 aa 38 ac 43 48 aa 4c  4e 3a 42 49 b2 37 ab 28  |0.8.CH.LN:BI.7.(|
000009e0  58 33 20 af 20 37 29 00  12 12 c0 0d 8b 20 28 43  |X3 . 7)...... (C|
000009f0  4c 20 af 20 31 29 b2 31  20 a7 20 97 20 42 59 2c  |L . 1).1 . . BY,|
00000a00  c2 28 42 59 29 20 b0 20  28 32 ae 42 49 29 3a 8e  |.(BY) . (2.BI):.|
00000a10  00 32 12 ca 0d 97 20 42  59 2c c2 28 42 59 29 20  |.2.... BY,.(BY) |
00000a20  af 20 28 32 35 35 ab 28  32 ae 42 49 29 29 3a 8e  |. (255.(2.BI)):.|
00000a30  00 00 00                                          |...|
00000a33