$%¥úARR¨ÉDÌX°Y°RDÓÚROÔANÇÒØÙCIÒÁPAGE¶OBÊ@ ãïíðõôå¡’êõ’ð縴’øó›REQUIRES AT LEAST 48K› 7AY A04€9AP<@,7""**** ARRAY FILL ROUTINE ****›-AP6€8<,-G:,(6€8<@,-E:,2 ;** SETUP GRAPHICS MODE **›< +@F1AAD'AAD1@O!!** CALCULATE START OF DL **›P%%6‚-F:A`,%AV$F:Aa,Z36ƒ-AY6„-@y'6…-@x36†-@c""**** DRAW GLOBE ROUTINE ****›d ‡-@6@nˆ-‡‡%A€@ x6‰-…$€8ˆ<@,‚6Š-ƒ%‰$€8Ap<@,Œ6‹-„%…$€8Ap<,– ,Š‹ Œ-A€AP@ª6Š-‰$€8Œ<@,´6‹-…$€8Œ<,¾ /ƒ%Š„%‹È ˆ"‡/ƒ&Š„%‹,ƒ%Š„%‹Ò ŒÜ ˆæ†AA ð ‡õC‚%@A)+‚%AAD?Š-@@C ŠöC‚%@@—+‚%AA?Š-@@C Š÷C‚%@@e+‚%A@€?Š-@@C Šø AEú 6-?:Ž,ç!!* POINTER POKE SUBROUTINE *›è+‚%@@—+‚%AAò@‰@—ü6†-@$Ï * POINER POKE SUBROUTINE *›Ð+‚%@@e+‚%A@€Ú@‰@eä6†-î$· ""**** ML READ SUBROUTINE ****›¸ 6Ž-A6 -@XÌ "Ö Ž%à  ê $Ÿ!!** MACHINE LANGUAGE DATA **› !!104,169,5,133,204,169,6,162›ª6,160,15,32,92,228,96,165›´ 20,41,1,208,29,164,204,185›¾ 53,6,141,85,128,136,185,53›È6,141,181,128,192,0,240,6›Ò136,132,204,76,50,6,169,5›Ü!!133,204,76,95,228,80,65,112›æ97,144,129›€ D4:GLOBE.BAS