#€)!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žÉ=NNNNNNNNNNNNNNNNNNNNNN”””ū€GPROGS ƒP9čģNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žś NNNNNNNNNNNNNNNNNNNNNN”””ūį"NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žÆ_NNNNNNNNNNNNNNNNNNNNNN”””ūREVID €SinViewprtéPƒTR€ €Csize éPƒTS€ €CharCell éPƒTU€ €Lorg éP ƒTW€ €Ldir éP&ƒTX€ €SinLabel éP*ƒU€ €SinLabel2 éP1ƒU€ €mNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žœnNNNNNNNNNNNNNNNNNNNNNN”””ūSinAxes éP9 ƒU€ €SinGrdAxeséPD ƒU€ €Pen éPOƒU€ €Gstore éP_ƒU€ €Lem1 éP| ƒU€ €Lem2 éP… ƒU€ €Rplot éPƒU€ €Iplot éP  ƒU€ €`™NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žłNNNNNNNNNNNNNNNNNNNNNN”””ūScenery éP«ƒU#€ €Symbol éPĆƒU&€ €Animation éPŚ€ €DumpGraph čƒU4€Contour ļ!ƒU8€9836C éP ƒUA€ €RIPPLES éPƒUE€ €STEREO éP%5ƒUP€ €ĻNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž6ČNNNNNNNNNNNNNNNNNNNNNN”””ūBar_Chart éPZNƒUU€ €Pie_Chart éPØ%€ €Lem2D éPĶ"ƒV€ €Cube3D éPļƒV € €BACKGROUNDéPƒV€ €Routines éP"RƒV€ €CIRCLES éPtƒV#€ €BAR_KNOB éP‰ƒV3€ €`[NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žc›NNNNNNNNNNNNNNNNNNNNNN”””ūBAR_KNOB2 éP‘ ƒV9€ €SWITCHES éPgƒVG€ €SKETCH éP0ƒVS€ €Gray_Map 4ƒVY€STORM éPCAƒW€ €Surface „#ƒW€MARQUEE éP§€ €Scale ’’¦€MKNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žPŖNNNNNNNNNNNNNNNNNNNNNN”””ūScale ’’¦€Setgu ©ƒ% $€Setuu «ƒ% 0€Show ­ƒ% 5€Window °ƒ% '€PenSpeed ³ƒ% 8€Ask ¶ ƒ% B€Message Įƒ% E€ĻÆNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž@”NNNNNNNNNNNNNNNNNNNNNN”””ūDATA_POINTČ€DATA_POINTĪ€CIRCLES éPŌ€ €Animation éPé € €BAR_KNOB éPöƒU€ €BAR_KNOB2 éPž ƒUB€ €SWITCHES éP gƒV€ €SKETCH éPq0ƒVP€ €hņNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž s„NNNNNNNNNNNNNNNNNNNNNN”””ūContour ” € ’’ ĖŽNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž &öNNNNNNNNNNNNNNNNNNNNNN”””ū TŁNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ĒNNNNNNNNNNNNNNNNNNNNNN”””ū TŁNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ŒPNNNNNNNNNNNNNNNNNNNNNN”””ū TŁNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž æaNNNNNNNNNNNNNNNNNNNNNN”””ū TŁNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žź2NNNNNNNNNNNNNNNNNNNNNN”””ū TŁNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŁNNNNNNNNNNNNNNNNNNNNNN”””ū TŁNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žž NNNNNNNNNNNNNNNNNNNNNN”””ū10 ! Graphics Programs<20 ! 98612-11625 (for internal 5.25" disk drives) Rev A30 ! 11 April 1983f+40 ! Copyright 1983, Hewlett-Packard Co.k50 ! All Rights Reservedl’’SinLabel éP*ƒU€ €SinLabel2 éP1ƒU€ €ļNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žĶ.Œ¼ 2 30,T,20,his,10,isjustlike,7,thosecutelittlecharts³Ž@,>–¼ !;NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž D•NNNNNNNNNNNNNNNNNNNNNN”””ū 5,thatyoualwaysseeinyourfriendly³@8, ¼ - 3,neighborhoodoptometristsoropticiansoffice.³@8Ŗ½¶Ž) have done with³ 98NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ĘNNNNNNNNNNNNNNNNNNNNNN”””ū’’’’¶@ĀĀ’’’’śJD’’z˜ę”°ęŒ’’’ģ’ūL0Ž šĘ ’’’Ų’’’Ä(0Ę 6PĘ <€’’’¼F D ’ūV ’ū’’’õ’ū` ’ūn ’ū’ūt’ūzof$FNAskFile$XIOoZNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž "÷NNNNNNNNNNNNNNNNNNNNNN”””ūopsSource$ FNFile_exists Destination$FNAskMessageBombed X_gdu_max Y_gdu_max FNData_pointText$CsizeY@4 »"¶%' Initialize various graphics parameters³@44ƒµŽINTERNAL»#¶% Use the internal screen³Ž@*4»¶% Turn œNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž »`NNNNNNNNNNNNNNNNNNNNNN”””ūon the graphics screen³Ž@**(»¶% Draw a box around the screen³@P*2€µ!Ž$µ(@ėµ8Ž@6€»¶%' Isotropic units; Left/Right/Bottom/Top³@P< €µ!$°@¶Ž% \³Ž@ F€µ!°@¶Ž% \³@, P µŽ?¹™™™™™šźµ?¹™™™™™šč»¶Ž% \³Ž@,, Z µŽØŪNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ˆQNNNNNNNNNNNNNNNNNNNNNN”””ū?¹™™™™™ščµ?¹™™™™™šź»¶Ž% \³@F, d µŽ?¹™™™™™ščµ?¹™™™™™šč»¶Ž% > Draw all the little Xs.³Ž@,F n µŽ?¹™™™™™šźµ?¹™™™™™šź»¶Ž% /³@, x“Ž?¹™™™™¶Ž% /³Ž@‚“Ž ?¹™™™™¶Ž% /³@Œ €µ!‰°޶Ž% ¶Ž% \³Ž@ – ‰č€µ!Ž»¶% \³@8£ÉNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŻNNNNNNNNNNNNNNNNNNNNNN”””ū  »¶%* > Draw boxes around the character cells³Ž@8Ŗ“Ž %* >¶Ž% /³@6“»¶%( Deactivate clipping so LABELs will work³Ž@66¾µ!2»¶%% Character cells half the screen high³@26Ȁ€»¶%# Starting point (LORG 1 by default)³@&2Ņ» µ2ŽAbCd¤¶*šNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žī3NNNNNNNNNNNNNNNNNNNNNN”””ū% Sample letters³@&܇µ(Ž?ÜĢĢĢĢĢĶ»¶3 \³Ž@ꆻ¶Ž3 \³@*šµ!µ!»¶3 > Write the title³Ž@:*ś» µ2Ž#Size of Character in Character Cell¤¶Ž3 /³@:½¶Ž% Terminate³Ž ŒŁNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žæ‰NNNNNNNNNNNNNNNNNNNNNN”””ū’’’’6@ĀĀ’’’’śŹD’’zę”0ęŒ’’’ģ’ūL0Ž šĘ ’’’Ų’’’Ä(0Ę 6PĘ <€’’’¼F D ’ūV ’ū’’’õ’ū` ’ūn ’ū’ūt’ūz’ū|File$XIOséNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŒøNNNNNNNNNNNNNNNNNNNNNN”””ūopsSource$ FNFile_exists Destination$FNAskMessageBombed X_gdu_max Y_gdu_max FNData_pointText$CsizeYLorg@4 »"¶!' Initialize various graphics parameters³@44ƒµŽINTERNAL»#¶! Use the internal screen³Ž@*4»¶! Turn oŁNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŁėNNNNNNNNNNNNNNNNNNNNNN”””ūon the graphics screen³Ž@D*(€Šµ8@%€»¶Ž!) Isotropic scaling: Left/Right/Bottom/Top³@*D2»¶! Draw a box around the screen³@0*<‰°Ž Draw ¶Ž! Loop on LORG parameters³Ž@60 F‚»¶Ž!& Left-center origin for the "LORG n ="³Ž@,6 P„»¶Ž! Chara4NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žźŚNNNNNNNNNNNNNNNNNNNNNN”””ūcters cell 4 GDUs high³Ž@6, Z€»¶!& Move to position for "LORG n =" label³Ž@26 d» µ2ŽLORGŸŸµ2Ž=¤¶Ž! Write the label³Ž@*2 nˆµŽ?¹™™™™™ščµ?¹™™™™™šč»¶Ž! \³Ž@** xˆµŽ?¹™™™™™šźµ?¹™™™™™šź»¶Ž! \³@N* ‚ˆµŽ?¹™™™™™šźµ?¹™™™™™šč»¶Ž!& > q(NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žsMNNNNNNNNNNNNNNNNNNNNNN”””ūDraw an "X" to show where pen is³Ž@*N ŒˆµŽ?¹™™™™™ščµ?¹™™™™™šź»¶Ž! /³@(* –»¶Ž! Specify LORG for "TEST",³@&(  †»¶Ž! ...and larger letters³Ž@*& Ŗˆ»¶! Move the center of the "X"³@8* “» µ2ŽTEST¤¶!! Write "TEST", using current LORG³@"8‘ĪNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž@|NNNNNNNNNNNNNNNNNNNNNN”””ū¾“Ž2ŽTE¶Ž! And so forth³@"Ƚ¶Ž! Cease and desist³ ͵NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž/NNNNNNNNNNNNNNNNNNNNNN”””ū’’’’ņ@ĀĀ’’’’üD’’¶Ś"”ģ"Œ’’’ģ’ūL0Ž šĘ ’’’Ų’’’Ä(0Ę 6PĘ <€’’’¼F D ’ūV ’ū’’’õ’ū` ’ūn ’ū’ūt’ūz’ū|’’’ļ’ū‚ Oq:NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž&NNNNNNNNNNNNNNNNNNNNNN”””ūopsSoerce$ FNFide_exists destinatiof$FNAskFile$XIOopsSource$ FNFile_exists Destination$FNAskMessageBombed X_gdu_max Y_gdu_max FNData_pointText$CsizeYLorgAngle@4 »"¶'' Initialize various graphics parameters³@44ƒµŽ2fNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž6 NNNNNNNNNNNNNNNNNNNNNN”””ūINTERNAL»#¶' Use the internal screen³Ž@*4»¶' Turn on the graphics screen³Ž@**(»¶' Draw a box around the screen³@F*2ėµ(Ž?ń™™™™™šė»¶') Anisotropic units; Left/Right/Bottom/Top³@$F<»)¶' Angular mode: Degrees³Ž@,$F‚»¶Ž' Label oriźüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž NNNNNNNNNNNNNNNNNNNNNN”””ūgin is left center³Ž@,,P€µ1^аŽabel o¶Ž' Every 10 degrees³@ , Z»¶Ž' Labelling angle³Ž@( d€€»¶' Move to center of screen³@>( n» µ2Ž -------LDIRŸ¤¶Ž' Write using the current LDIR³@ >x“Ž2Ž --¶Ž' And so on³Ž@ ‚½¶Ž' Quit³ jNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž PBNNNNNNNNNNNNNNNNNNNNNN”””ū’’’’¾@ĀĀ’’’’łBD’’¶¤"”ø"Œ’’’ģ’ūL0Ž šĘ ’’’Ų’’’Ä(0Ę 6PĘ <€’’’¼F D ’ūV ’ū’’’õ’ū` ’ūn ’ū’ūt’ūz’ū|’’’ļ’ū‚ O’NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž csNNNNNNNNNNNNNNNNNNNNNN”””ūopsSoerce$ FNFide_exists destinatiof$FNAskFile$XIOopsSource$ FNFile_exists Destination$FNAskMessageBombed X_gdu_max Y_gdu_max FNData_pointText$CsizeYLorgAngle@6 »"¶%( Initialize various graphics parameters.³Ž@46ƒµv@NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž śäNNNNNNNNNNNNNNNNNNNNNN”””ūŽINTERNAL»#¶% Use the internal screen³Ž@*4»¶% Turn on the graphics screen³Ž@B*(‹ĄĄ쐶Ž%+ Determine how many GDUs wide the screen is³@DB2 ‹ĄķĄ쐶Ž%+ Determine how many GDUs high the screen is³@8D<†»¶Ž%( Reference point: centc÷NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ÉÕNNNNNNNNNNNNNNNNNNNNNN”””ūer of top of label³Ž@28F‚ķ »¶% Move to middle of top of screen³Ž@82P» µ"ŽVOLTAGE VARIANCE¤¶% Write title of plot³Ž@48Z»)¶%' Angular mode is degrees (used in LDIR)³@*4dµ!Z»¶% Specify vertical labels³Ž@2*nµ(@ »¶% Specify smallNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žœ†NNNNNNNNNNNNNNNNNNNNNN”””ūer characters³@82x€ ‚ķ»¶%& Move to center of left edge of screen³Ž@.8‚» µ2ŽVoltage¤¶Ž% Write Y-axis label³@:.Œ„»¶Ž%+ Reference point: center of bottom of label³@(:–€»¶Ž% Horizontal labels again³Ž@F( ‚ķµŽ?±ė…øQģ ģ»¶%) X: center of ]‹NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žÆ·NNNNNNNNNNNNNNNNNNNNNN”””ūscreen; Y: above key labels³@4FŖ» µ2ŽTime (seconds)¤¶% Write X-axis label³@Z4“µ?¹™™™™™šģµ(?ļ®zįGÆģµ(?Ć333333 ģµ?ģĢĢĢĢĢĶ ģ» ¶u Define subset of screen area³@.Z¾»¶%! Draw a box around defined subset³@B.Ȁ‹µ!µ!»¶%+ Anisotropic scali'tNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žˆ¹NNNNNNNNNNNNNNNNNNNNNN”””ūng: left/right/bottom/top³@ Label X-a=ģNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ždNNNNNNNNNNNNNNNNNNNNNN”””ūxis³@6D » µ2Ž#,Kœž ¤¶% Compact; no CR/LF | /³Ž@06"“Ž 2Ž#,¶Ž% et sequens |/³@,0,ˆ»¶Ž% Ref. pt: Right center |\³Ž@D,6 µ!޵!µ(?аt cent¶Ž% Every quarter | \³@DD @µ?ąė »¶%+ Smidgeon leftR’NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žB7NNNNNNNNNNNNNNNNNNNNNN”””ū of Y-axis | > Label Y-axis³@:D J» µ2Ž#,DD.DDœž ¤¶% DD.D; no CR/LF | /³@2:T“Ž 2Ž#,¶Ž% et sequens |/³Ž@(2^»¶% LABEL leaves the pen down³Ž@<(h ‹°Ž LABEL¶Ž%$ One hundred points to be plotted...³Ž@:< r Ó²»&¶%'°NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žqNNNNNNNNNNNNNNNNNNNNNN”””ū Get a data point and plot it against X³@ :|“Ž »&¶¶Ž% et cetera³Ž@ †½¶Ž% finis³Ž v„NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žč‘NNNNNNNNNNNNNNNNNNNNNN”””ū’’’’ Ā@ĀĀ’’’’õ>D’’¶ Ø"” ¼"Œ’’’ģ’ūL0Ž šĘ ’’’Ų’’’Ä(0Ę 6PĘ <€’’’¼F D ’ūV ’ū’’’õ’ū` ’ūn ’ū’ūt’ūz’ū|’’’ļ’ū‚ OĶNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŪ NNNNNNNNNNNNNNNNNNNNNN”””ūopsSoerce$ FNFide_exists destinatiof$FNAskFile$XIOopsSource$ FNFile_exists Destination$FNAskMessageBombed X_gdu_max Y_gdu_max FNData_pointText$CsizeYLorgAngle@6 »"¶%( Initialize various graphics parameters.³Ž@46ƒµv@NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŽóNNNNNNNNNNNNNNNNNNNNNN”””ūŽINTERNAL»#¶% Use the internal screen³Ž@*4»¶% Turn on the graphics screen³Ž@8*(†»¶Ž%( Reference point: center of top of label³Ž@B82‹ĄĄ쐶Ž%+ Determine how many GDUs wide the screen is³@DB< ‹ĄķĄ쐶Ž%+ Determine how many GDUsøNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž½ĀNNNNNNNNNNNNNNNNNNNNNN”””ū high the screen is³@VDF µŽ?Ó333333ėµŽ?Ó333333µ?¹™™™™™š°y GDUs¶Ž% Offset of X from starting point³Ž@:V P‚ķ č »¶%& Move to about middle of top of screen³Ž@8: Z» µ"ŽVOLTAGE VARIANCE¤¶% Write title of plot³Ž@.8d“Ž "ŽVO¶Ž% Next position fiƒNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž­üNNNNNNNNNNNNNNNNNNNNNN”””ūor title³Ž@4.n»)¶%' Angular mode is degrees (used in LDIR)³@*4xµ!Z»¶% Specify vertical labels³Ž@2*‚µ(@ »¶% Specify smaller characters³@82Œ€ ‚ķ»¶%& Move to center of left edge of screen³Ž@.8–» µ2ŽVoltage¤¶Ž% Write Y-axis label³-¾NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž žĶNNNNNNNNNNNNNNNNNNNNNN”””ū@:. „»¶Ž%+ Reference point: center of bottom of label³@(:Ŗ€»¶Ž% Horizontal labels again³Ž@F(“‚ķµŽ?±ė…øQģ ģ»¶%) X: center of screen; Y: above key labels³@4F¾» µ2ŽTime (seconds)¤¶% Write X-axis label³@Z4ȵ?¹™™™™™šģµ(?ļ\(õĀ]ģµ(?Ć33{/NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ĖžNNNNNNNNNNNNNNNNNNNNNN”””ū3333 ģµ?ģĢĢĢĢĢĶ ģ» ¶u Define subset of screen area³@BZŅ€‹µ!µ!»¶%+ Anisotropic scaling: left/right/bottom/top³@HB܁µŽ?©™™™™™š€µ!Ž……ƒ»%¶%% Draw axes intersecting at lower left³@JHꁵŽ?©™™™™™š‹µ!Ž……ƒ»%¶%& Draw axes intersecting at uppZźNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ųÆNNNNNNNNNNNNNNNNNNNNNN”””ūer right³Ž@BJšŠµ(Ž?Š€µ!ށ»$¶Ž% Draw grid with no minor ticks³Ž@6Bś»¶%) So labels can be outside VIEWPORT limits³@B6µ(@µ?ą»¶%! Smaller chars for axis labelling³@*B†»¶Ž% Ref. pt: Top center |\³@4* €‹Š°% Refµ/NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž a8NNNNNNNNNNNNNNNNNNNNNN”””ū¶Ž% Every 10 units | \³Ž@D4 " µHŽ@/śįG®{»¶%+ A smidgeon below X-axis | > Label X-axis³@6D ,» µ2Ž#,Kœž ¤¶% Compact; no CR/LF | /³Ž@066“Ž 2Ž#,¶Ž% et sequens |/³@,0@ˆ»¶Ž% Ref. pt: Right center |\³Ž@D,J µifNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž R NNNNNNNNNNNNNNNNNNNNNN”””ū!޵!µ(?аt cent¶Ž% Every quarter | \³@DD Tµ?ąė »¶%+ Smidgeon left of Y-axis | > Label Y-axis³@:D ^» µ2Ž#,DD.DDœž ¤¶% DD.D; no CR/LF | /³@2:h“Ž 2Ž#,¶Ž% et sequens |/³Ž@22r»¶%$ LABEL s0aNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žZNNNNNNNNNNNNNNNNNNNNNN”””ūtatement leaves the pen down³Ž@<2| ‹°Ž LABEL¶Ž%$ One hundred points to be plotted...³Ž@:< † Ó²»&¶%' Get a data point and plot it against X³@ :“Ž »&¶¶Ž% et cetera³Ž@ š½¶Ž% finis³Ž \‚NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž4kNNNNNNNNNNNNNNNNNNNNNN”””ū’’’’^@ĀĀ’’’’š¢D’’`DhųXhŒ’’’ģ’ūL0Ž šĘ ’’’Ų’’’Ä(0Ę 6PĘ <€’’’¼F D ’ūV ’ū’’’õ’ū` ’ūn ’ū’ūt’ūz’ū|’’’ļ’ū‚£¶NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žeNNNNNNNNNNNNNNNNNNNNNN”””ū’ūˆB’ūšĚ B¦’’’é’ūŖ’’’čB®’ū²BĄ’ūĪ’ūŌ’ūŲFile$XIOopsSource$ FNFile_exists Destination$FNAskMessageBombed X_gdu_max Y_gdu_max FNData_pointText$CsizeYLorgAnglePolĪ£NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž TNNNNNNNNNNNNNNNNNNNNNN”””ūygonPolygonsSideSidesPenDxDy Define_deltas Define_deltasTempNewPrevious@. ¼!£!£!£!£!¤¶1 Make loops faster³Ž@$.µ!ސ¶1 How many polygons?³@$$ƒ¶1 How many sides apiece?³@*$(€¶1 1: Draw/erase; 0:ąÜNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žuNNNNNNNNNNNNNNNNNNNNNN”””ū Complement³@,*2½€ź½½½) £€ź½½½(¤³Ž@,<½½½%£½½$¤³Ž@"F½¶1 Different each time³Ž@,"P»"¶1 Initialize graphics parameters³@4,ZƒµŽINTERNAL»#¶1 Use the internal screen³Ž@&4d»¶1 Turn on graphics screen³Ž@6&Ā-NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žF6NNNNNNNNNNNNNNNNNNNNNN”””ūn€µ1Ž’€µ1Ž…»¶1 Integer arithmetic is faster³@&6x»¶Ž1 Select appropriate pen³@*&‚°Ž1 Sel¶Ž1 For each vertex...³@6* Œ€ Čæµ1쐶Ž1 ...define a starting point...³Ž@.6 –€Čæµ1†ģ¶Ž1 ...for both X and Y...³@4.  € ȀČ»&¶Ž1 ...p/NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žß”NNNNNNNNNNNNNNNNNNNNNN”””ūthen draw to that point.³Ž@ 4Ŗ“ހȻ¶Ž1 et cetera³Ž@< “‚ņ·€Ȁ ȀČ»&¶Ž1 If simple line, don't close³Ž@,<¾•¶Ž1 Get dx and dy for each vertex³Ž@0,ȁź°Žet dx ¶Ž1 Draw all the polygons³Ž@$0 Ņ»¶1 Don't connect polygons³@4$ ܁°1ĢNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žģNNNNNNNNNNNNNNNNNNNNNN”””ūŽ Don't¶Ž1 Each vertex of each polygon³Ž@,4 ꁟ ČĒ萶Ž1 Avoid recalculation³Ž@, šµ1Ž’ņ·Ē萶Ž1 \³Ž@ śĒĒ됶Ž1 \³@H øŽĒǶŽ7 (it's not off right side) ! > Is X out of range?³@H €ó·ǶŽĒĒ됶Ž1 /³@, ¹¶ (off righŪąNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž¹ĆNNNNNNNNNNNNNNNNNNNNNN”””ūt side?) ! /³Ž@*, " ȁź ČĒ萶7 Calculate next X³@,* ,źČĒ萶Ž1 Avoid recalculation³Ž@, 6µ1Ž…ņ·Ē萶Ž1 \³Ž@ @ĒĒ됶Ž1 \³@H JøŽĒǶŽ7 (it's not off top) ! > Is Y out of range?³@H T€ó·ǶŽĒĒ됶Ž1ä"NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŠņNNNNNNNNNNNNNNNNNNNNNN”””ū /³@, ^¹¶ (off the top?) ! /³Ž@*, hȁźČĒ萶7 Calculate new Y³Ž@.* r ČČ»&¶Ž1 Draw line to new point³@4. |“ŽČ»¶Ž1 Loop for next side of polygon³Ž@44 †‚ņ·Č ȁȻ&¶Ž7 If line, don't close³@&4“ŽČ^1NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žšĢNNNNNNNNNNNNNNNNNNNNNN”””ū¶Ž1 Get each polygon³@&&š€¶1 Start re-use at entry 0³Ž@.&¤Š»h’½¶1 Change deltas periodically³@.®» ¶1 Ad infinitum...³Ž@( ø€ń·1 A¶Ž1 Boundary condition?³Ž@$( ꐶ1 Start re-using over³Ž@$ ̸ށꐶ¶Ž (new>0)³Ž@& ցčüŽ1*NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ©żNNNNNNNNNNNNNNNNNNNNNN”””ū Re-use next entry³Ž@& ą¹¶ (new=0?)³@$ ź»¶1 Don't connect polygons³@.$ ōė»¶1 This works either way for Pen³Ž@*. žŠ¶1 Don't interrupt in "Side" loop³@* °Žon't i¶Ž1 \³Ž@  ČČ»&¶Ž1 \³@, “ŽČ»¶Ž1 > Erase oldest liNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ü®NNNNNNNNNNNNNNNNNNNNNN”””ūne³Ž@", &‚ņ·Č ȁȻ&¶Ž1 /³@" 0»¶1 /³Ž@ :»¶Ž1 Drawing pen³Ž@ D°Ž1 Dra¶Ž1 \³Ž@ N ČĒ萶Ž1 \³@ Xµ1Ž’ņ·č¶Ž¶Ž1 \³Ž@ bĒĒ됶Ž1 \³@ løŽĒǶŽ1 \³Ž@" v€ó·ǶŽĒĒ됶Ž1 \³@" €¹¶1 ˜„NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ϟNNNNNNNNNNNNNNNNNNNNNN”””ū \³Ž@  Š Č ČĒ萶1 \³@2 ”ČĒ萶Ž1 \ Draw the new line³@62 žµ1Ž…ņ·č¶Ž¶Ž1 / same way as before.³@6 ØĒĒ됶Ž1 /³@ ²øŽĒǶŽ1 /³Ž@" ¼€ó·ǶŽĒĒ됶Ž1 /³@" ƹ¶1 /³Ž@ Š|NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž VNNNNNNNNNNNNNNNNNNNNNN”””ūČČĒ萶1 /³@ Ś ČČ»&¶Ž1 /³Ž@ 䓎Č»¶Ž1 /³@" ī‚ņ·Č ȁȻ&¶Ž1 /³Ž@ " ų϶1 Interrupts OK again³Ž@( čüŽ1 Next one to re-use.³Ž@(( »ŽüŽ1 End of infinite loop³ĄH(¶Ž: -------------------------ņMNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž e9NNNNNNNNNNNNNNNNNNNNNN”””ū--------------------------------³Ž@(H °Ž------¶Ž1 For each vertex³Ž@*( *Ēæƒģ‚萶Ž1 Magnitude of this dx³@6* 4æµ?ąó· MagĒĒ됶Ž1 Sign of this dx³Ž@*6 >Ēæƒģ‚萶Ž1 Magnitude of this dy³@6* Hæµ?ąó· MagĒĒ됶Ž1 Sign of%NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž0jNNNNNNNNNNNNNNNNNNNNNN”””ū this dy³Ž@ 6R“Ž?ą¶Ž1 et cetera³Ž@& \ŗ¶Ž1 back to the main program³@&f½¶Ž1 Finis³Ž ӟNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž[NNNNNNNNNNNNNNNNNNNNNN”””ū’’’’"@ĀĀ’’D’’č¶X X6Œ’’’ģ’ūL0Ž šĘ ’’’Ų’’’Ä(0Ę 6PĘ <€’’’¼F D ’ūV ’ū’’’õ’ū` ’ūn ’ū’ūt’ūz’ū|’’’ļ’ū‚·µNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žRįNNNNNNNNNNNNNNNNNNNNNN”””ū’ūˆB’ūšĚ B¦’’’é’ūŖ’’’čB®’ū²BĄ’ūĪ’ūŌ’ūŲ’’’ā’ūā’ūź ’ūš!’ūö"’ūž#’ū’’’Ü’ū %’ū&’ū'’ū (’ū$)’ū.’’’Ö’ū8+’ūD)gNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žaŠNNNNNNNNNNNNNNNNNNNNNN”””ū,’ūN-BX.’ūb/Bh’’’Š’ūn1’ūt2’ūzide_exists destinatiof$FNAskFile$XIOopsSource$ FNFile_exists Destination$FNAskMessageBombed X_gdu_max Y_gdu_max FNData_pointText$CsizeYLorgAnglePolygonPolygonsSłļNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž4ƒNNNNNNNNNNNNNNNNNNNNNN”””ūideSidesPenDxDy Define_deltas Define_deltasTempNewPreviousScreenXminXmaxXrangeYminYmaxYrangeDecadeUnitsPerMantissaExponent TemperatureRotation New_curve New_curveSpinSpinDeltaDelta FNIntensity@0 ¼%]NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž²NNNNNNNNNNNNNNNNNNNNNN”””ū0Ą¤¶% To store the screen image in³@60»"¶%( Initialize various graphics parameters.³Ž@46ƒµŽINTERNAL»#¶% Use the internal screen³Ž@*4(»¶% Turn on the graphics screen³Ž@,*2†»¶Ž% Large letters for main title³@8,<†»¶Ž%( Reference poivĻNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žž%NNNNNNNNNNNNNNNNNNNNNN”””ūnt: center of top of label³Ž@B8F‹ĄĄ쐶Ž%+ Determine how many GDUs wide the screen is³@DBP ‹ĄķĄ쐶Ž%+ Determine how many GDUs high the screen is³@VDZ µ(Ž?Šėµ(Ž?е?¹™™™™™š°y GDUs¶Ž% Offset of X from starting point³Ž@:V d‚ åNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž­NNNNNNNNNNNNNNNNNNNNNN”””ūķ č »¶%& Move to about middle of top of screen³Ž@<: n» µ2ŽBlackbody Radiation¤¶Ž% Write title of plot³Ž@.<x“Ž 2ŽBl¶Ž% Next position for title³Ž@6.‚„»¶Ž%' Smaller letters for temperature legend³@46Œ‚ķ µ(?īfffffgģ»¶Ž% Right below main ¹LNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žųGNNNNNNNNNNNNNNNNNNNNNN”””ūtitle³@P4–» µ2ŽTemperature (K): ¤¶%' Label offset to left so value will fit³@4P »)¶%' Angular mode is degrees (used in LDIR)³@*4Ŗµ!Z»¶% Specify vertical labels³Ž@2*“µ(@ »¶% Specify smaller characters³@82¾€ ‚ķ»¶%& Move to cnONNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žĖvNNNNNNNNNNNNNNNNNNNNNN”””ūenter of left edge of screen³Ž@<8Č» µ2ŽIntensity of Radiation¤¶% Write Y-axis label³@:<Ņ„»¶Ž%+ Reference point: center of bottom of label³@(:܀»¶Ž% Horizontal labels again³Ž@F(ę‚ķµŽ?±ė…øQģ ģ»¶%) X: center of screen; Y: above key labeląNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŪHNNNNNNNNNNNNNNNNNNNNNN”””ūs³@:Fš» µ2ŽWavelength (microns)¤¶% Write X-axis label³@Z:śµ?¹™™™™™šģµ(?ļ\(õĀ]ģµ(?Ć333333 ģµ?ģĢĢĢĢĢĶ ģ» ¶u Define subset of screen area³@Z„됶Ž% \³Ž@ ƒ¶% \³@! ꐶ% \³Ž@>"µŽ?¹™™™™™š¶%' \ Calculate X and Y inteń NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž čyNNNNNNNNNNNNNNNNNNNNNN”””ūrnal data³@>,"…됶Ž% /³@6#µ!ސ¶% /³Ž@@$#"ꐶ% /³@J¶% /³Ž@<T "#»¶%+ Anisotropic scaling: left/right/bottom/top³@6<^»¶%) So labels can be outside VIEWPORT limits³@&6h% °Ž So la¶Ž% |\³@*& r&ˆ% óüģč°O–NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ½*NNNNNNNNNNNNNNNNNNNNNN”””ū¶Ž% ¶Ž) | \³Ž@"* | %&æ 萶% | \³@:" † "»¶%* | > Draw logarithmic X-axis³Ž@ :  #»¶% | /³@& š“Ž&¶% ¶Ž% | /³Ž@$&¤“Ž%¶% ¶Ž% |/³@4$®  Šģ° ¶Ž%¶Ž% ĒNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ŽNNNNNNNNNNNNNNNNNNNNNN”””ū |\³@,4 ø†»¶Ž% | \³Ž@,, ƒ»¶Ž% | \³@<, Ģ "$µŽ?„zįG®{ģź»¶% A smidgeon below X-axis | \³Ž@L< Ö» µ2Ž#,Kœžµ2Ž10 ¤¶Ž%* Compact; no CR/LF | \ Label the³Ž@6L ą‚»¶Ž%'LNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ŒNNNNNNNNNNNNNNNNNNNNNN”””ū | / X-axis³@.6 ꁻ¶Ž% | /³Ž@@. ō !µ?„zįG®{ģč"$µ?žøQė…¹ģź»¶, | /³Ž@6@ ž» µ2Ž#,Kœž ¤¶% | /³Ž@06“Ž 2Ž#,¶Ž% et sequens |/³@0e]NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž $½NNNNNNNNNNNNNNNNNNNNNN”””ū»¶% | \³@!"…»%¶Ž% | \³Ž@:&! #…»%¶Ž%$ | > Only powers of 10 on Y-axis³Ž@:0…ģ"»$¶Ž% | /³Ž@:»¶% | /³@6D"#…ģ°| /³%¶Ž% Logarithmic Y-axis |\³Ž@,6 N„»¶Ž% Big chars for "10" | \³@., Xˆ»¶ŽI}NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žqīNNNNNNNNNNNNNNNNNNNNNN”””ū% | \³Ž@<. b!µ?žøQė…¹ģź»¶Ž% Smidgeon left of Y-axis | \³@J< l» µ2Ž#,Kœžµ2Ž10¤¶%+ | \ Label the³@8J v‚»¶Ž%( Small chars for exponent | / Y-axis³Ž@.8 €»¶Ž% ›`NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žBßNNNNNNNNNNNNNNNNNNNNNN”””ū | /³@@. Š!µ(?™™™™™™šģź$µ?„zįG®{ģč»¶- | /³Ž@6@ ”» µ2Ž#,Kœž¤¶% Compact; no CR/LF | /³@26ž“Ž2Ž#,¶Ž% et sequens |/³Ž@T2ضŽI Here is where the action starts................................œ(NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žeŃNNNNNNNNNNNNNNNNNNNNNN”””ū.........³@4T²Ķ»¶%$ Store the screen image in the array³Ž@,4¼„»¶Ž% Same size letters as before³Ž@(,ʁ»¶Ž% Lower left label origin³Ž@8(Š'А¶%* Number of knob pulses before action taken³Ž@28Ś(‰¶*% \ These three statements define the³@22«NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žVąNNNNNNNNNNNNNNNNNNNNNN”””ūä)‚¶*% > temperature in a way which can be³@.2ī*(Š)ī쐶* / changed logarithmically.³Ž@4.ų+А¶%& Make the subroutine notice first pass³Ž@04-•¶Ž%# Load the screen and plot the curve³@B0 µ?ą»+’-½¶Ž%% Look at the knob every half a seconš‘NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž³NNNNNNNNNNNNNNNNNNNNNN”””ūd³Ą8B ..–¶Ž%) Looplooplooplooplooplooplooplooplooploop³ĄL8 -¶Ž> -------------------------------------------------------------³Ž@(L*++Ą萶% Accumulate knob pulses³@.(4+æ'󷐶%ŗ¶Ž* If not enough, return³Ž@6.>Ķ»¶%' Load grid (in effect,|YNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž0‚NNNNNNNNNNNNNNNNNNNNNN”””ū erase old curve)³@*6H0+搶% Which way was knob turned?³@>*R(ƒń)‚ń÷0€ó÷(‚ń)µ!Žń÷0€ņ÷ų·turn¶Žu Reached the limits³@(> \‹µŽ?„zįG®{½$¶% Let user know³Ž@(føŽŽ?„¶Ž (in range)³@@ p +æ'ķæ°Žin ran¶Ž*" Allow rapid change of temperature³Ž@2ĢNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž©NNNNNNNNNNNNNNNNNNNNNN”””ū@ z1•¶Ž%$ Increment/decrement logarithmically³Ž@2 „“Ž %$ Inc³Ž@޹¶ (out of range?)³Ž@*˜*(Š)ī쐶* Build temperature value³Ž@4*¢+€¶%' Start knob rotation accumulation again³@84¬»¶%+ Allow label to be written outside viewport³@.8¶€µ8Ž@9Ö±NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žš$NNNNNNNNNNNNNNNNNNNNNN”””ūfffffg»¶% Go to label location³@..Ą» µ2ŽKœž*¤¶% Write new temperature³Ž@$.Ź»¶% Label leaves pen down³Ž@$$Ō»¶% Turn clipping back on³Ž@B$Ž  ‚ģ°urn cl¶Ž%( # data points: CEIL((Xmax-Xmin)/Dx+eps)³Ž@,B č2ӊ īÕ*Õ²¶Ž* Calculate intenkīNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žĻwNNNNNNNNNNNNNNNNNNNNNN”””ūsity³Ž@:, ņ æ »&¶Ž%' Get a data point and plot it against X³@ :ü“Ž »&¶Ž¶Ž% et cetera³Ž@ ŗ³ŽĄN 1¶ŽA ----------------------------------------------------------------³@0N(ƒń)‚ń÷0€ó÷·----ŗ¶Ž= \ Have you reached³@40$(‚ń)µ!ń÷0€ņ÷Ž·ŗ»»NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žüFNNNNNNNNNNNNNNNNNNNNNN”””ū¶Žŗ¶Ž= / a boundary yet?³Ž@&4.0€ņ·µ!¶Ž% Clockwise rotation³@>& 8(‰ń·µ!¶Ž%* Need to increment order of magnitude yet?³Ž@,> B))č¶% Increment order of magnitude³@&, L(¶% Start over with mantissa³@& VøŽ¶%¶Ž (mantissa<9)³@6 `((č¶%' I™5NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žģxNNNNNNNNNNNNNNNNNNNNNN”””ūn the middle of an order of magnitude³@6 j¹¶ (mantissa=9?)³Ž@DtøŽ (¶Ž 2 (delta<0) ! Counterclockwise rotation³Ž@>D ~(ń· (¶Ž¶Ž%* Need to decrement order of magnitude yet?³Ž@,> ˆ))ź¶% Decrement order of magnitude³@2, ’(‰¶%% Start$#NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ßINNNNNNNNNNNNNNNNNNNNNN”””ū mantissa over again at top end³@2 œøŽ¶%%¶Ž (mantissa>1)³@6 ¦((ź¶%' In the middle of an order of magnitude³@6 °¹¶ (mantissa=1?)³Ž@ŗ¹¶ (delta>0?)³@ Äŗ³Ž@ ν¶Ž% finis³Ž@TŲ¶ŽI ***************************************************ŽjNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ŠNNNNNNNNNNNNNNNNNNNNNN”””ū*********************³ĄāĮ’’žī@ ’’ŠzTn’ūB ’ūĚ"’ū.sity FNIntensity Intensity Wavelength Temperature Intensity³Ž@.ģµPŽ@āD@…åŠNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ¹+NNNNNNNNNNNNNNNNNNNNNN”””ūīķµH@,Ē®zįHģüķæźü퐳Ž@ .öŗ³@ ½³Ž )NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  ¼NNNNNNNNNNNNNNNNNNNNNN”””ū’’’’”@ĀĀ’’’’÷lD’’„XŗŽX6Œ’’’ģ’ūL0Ž šĘ ’’’Ų’’’Ä(0Ę 6PĘ <€’’’¼F D ’ūV ’ū’’’õ’ū` ’ūn ’ū’ūt’ūz’ū|’’’ļ’ū‚įĻNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž NNNNNNNNNNNNNNNNNNNNNN”””ū’ūˆB’ūšĚ B¦’’’é’ūŖ’’’čB®’ū²BĄ’ūĪ’ūŌ’ūŲ’’’ā’ūā’ūź ’ūš!’ūö"’ūž#’ū’’’Ü’ū %’ū&’ū'’ū (’ū$)’ū.’’’Ö’ū8+’ūD)gNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žFŽNNNNNNNNNNNNNNNNNNNNNN”””ū,’ūN-BX.’ūb/Bh’’’Š’ūn1’ūt2’ūz3’ū†4BŠ5’ū–File$XIOopsSource$ FNFile_exists Destination$FNAskMessageBombed X_gdu_max Y_gdu_max FNData_pointText$CsizeYLorgAnglePolygonPolygonsSćNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žuļNNNNNNNNNNNNNNNNNNNNNN”””ūideSidesPenDxDy Define_deltas Define_deltasTempNewPreviousScreenXminXmaxXrangeYminYmaxYrangeDecadeUnitsPerMantissaExponent TemperatureRotation New_curve New_curveSpinSpinDeltaDelta FNIntensityLem Pen_controlLemfNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žĢNNNNNNNNNNNNNNNNNNNNNN”””ū@" ¼ ¶Ž( Arrays start at one³Ž@<"¼3€€£4Ž€¤¶( Data and pen-control arrays³Ž@4< µ!°€£4¶Ž2 \ Define the LEM X and Y³Ž@64 (  3Č£ ‚3Č£ 4Ǥ¶2 > data and the pen-control³Ž@62“Ž Č£ ‚3ȶŽ2 / daŚHNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž0żNNNNNNNNNNNNNNNNNNNNNN”””ūta.³@4<»"¶(' Initialize various graphics parameters³@44FƒµŽINTERNAL»#¶( Use the internal screen³Ž@&4PŠėŠŠėŠ»¶( Isotropic scaling³Ž@*&Z»¶( Turn on the graphics screen³Ž@*d µ!°urn on¶Ž2 \³Ž@* n 3Č ‚3Č 4Ē»&¶2 > Plot the dat¶­NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””že®NNNNNNNNNNNNNNNNNNNNNN”””ūa³@*x“Ž ‚3Č 4¶Ž2 /³ŽĄJ ‚5¶Ž < X Y Pen | X Y Pen | X Y Pen | X Y Pen³Ž@TJŒ¼ < 1.5, 1, -2, 2.5, 2, -1, 2.5, 3, -1, 1.5, 4, -1 ¶ŽG Octagon³Ž@FT–¼ : -1.5, 4, -1, -2.5, 3, -1, -2.5, 2, -1, -1.5, 1, -1³Ž@PZõNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žVŸNNNNNNNNNNNNNNNNNNNNNN”””ūF ¼ < -2.5, 1, -2, 2.5, 1, -1, 2.5, -2, -1, -2.5, -2, -1 ¶ŽG Box³Ž@PŖ¼ -2.5, 1, -1³@T“¼ < -2.5, -2, -2, -4.5, -4, -1, -2.5, 0, -1, -5, -4, -2 ¶ŽG Left Leg³@T¾¼ -4, -4, -1³@Tȼ < 2.5, -2, -2, 4.5, -4, -1, 2.5,~NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žĻNNNNNNNNNNNNNNNNNNNNNN”””ū 0, -1, 5, -4, -2 ¶ŽG Rt. leg³Ž@TҼ 4, -4, -1³@Rܼ < -0.5, -2, -2, -1, -3, -1, 1, -3, -1, 0.5, -2, -1 ¶ŽG Nozzle³@ Rę½³Ž ŁPNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žü9NNNNNNNNNNNNNNNNNNNNNN”””ū’’’’ ¾@ĀĀ’’’’öBD’’ ®Xŗ øX6Œ’’’ģ’ūL0Ž šĘ ’’’Ų’’’Ä(0Ę 6PĘ <€’’’¼F D ’ūV ’ū’’’õ’ū` ’ūn ’ū’ūt’ūz’ū|’’’ļ’ū‚š+NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž©jNNNNNNNNNNNNNNNNNNNNNN”””ū’ūˆB’ūšĚ B¦’’’é’ūŖ’’’čB®’ū²BĄ’ūĪ’ūŌ’ūŲ’’’ā’ūā’ūź ’ūš!’ūö"’ūž#’ū’’’Ü’ū %’ū&’ū'’ū (’ū$)’ū.’’’Ö’ū8+’ūD)gNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žš[NNNNNNNNNNNNNNNNNNNNNN”””ū,’ūN-BX.’ūb/Bh’’’Š’ūn1’ūt2’ūz3’ū†4BŠ5’ū–File$XIOopsSource$ FNFile_exists Destination$FNAskMessageBombed X_gdu_max Y_gdu_max FNData_pointText$CsizeYLorgAnglePolygonPolygonsSćNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŠeNNNNNNNNNNNNNNNNNNNNNN”””ūideSidesPenDxDy Define_deltas Define_deltasTempNewPreviousScreenXminXmaxXrangeYminYmaxYrangeDecadeUnitsPerMantissaExponent TemperatureRotation New_curve New_curveSpinSpinDeltaDelta FNIntensityLem Pen_controlLemfNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ¹TNNNNNNNNNNNNNNNNNNNNNN”””ū@" ¼ ¶Ž( Arrays start at one³Ž@2"¼3€!€¤¶( Data and pen-control array³@$2 3ͤ¶Ž( Define the LEM data³Ž@4$(»"¶(' Initialize various graphics parameters³@442ƒµŽINTERNAL»#¶( Use the internal screen³Ž@&ĆNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ģNNNNNNNNNNNNNNNNNNNNNN”””ū4<ŠėŠŠėŠ»¶( Isotropic scaling³Ž@*&F»¶( Turn on the graphics screen³Ž@6*Pµ8?Ąµ8?Ąµ8?Ą»<¶( 12.5% gray³@"6Z3Ķ»D»E¶Ž( Plot the data³ŽĄJ" d5¶Ž < X Y Pen | X Y Pen | X Y Pen | X Y Pen³Ž@PJn¼  0, ‘=NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ß6NNNNNNNNNNNNNNNNNNNNNN”””ū 0, 11 ¶($ Start of polygon with FILL and EDGE³Ž@TPx¼ < 1.5, 1, -2, 2.5, 2, -1, 2.5, 3, -1, 1.5, 4, -1 ¶ŽG Octagon³Ž@FT‚¼ : -1.5, 4, -1, -2.5, 3, -1, -2.5, 2, -1, -1.5, 1, -1³Ž@@FŒ¼  0, 0, 7 ³óNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž F”NNNNNNNNNNNNNNNNNNNNNN”””ū ¶( End of first polygon³@F@–¼  0, 0, 6 ¶( Start of polygon with FILL³@PF ¼ < -2.5, 1, -2, 2.5, 1, -1, 2.5, -2, -1, -2.5, -2, -1 ¶ŽG Box³Ž@PŖ¼ -2.5, 1, -1³@B“¼  0, 0, 7 ¶( End of secondńSNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž uNNNNNNNNNNNNNNNNNNNNNN”””ū polygon³Ž@TB¾¼ < -2.5, -2, -2, -4.5, -4, -1, -2.5, 0, -1, -5, -4, -2 ¶ŽG Left Leg³@Tȼ -4, -4, -1³@TҼ < 2.5, -2, -2, 4.5, -4, -1, 2.5, 0, -1, 5, -4, -2 ¶ŽG Rt. leg³Ž@Tܼ 4, -4, -1³@Fę¼  0, 0, 10 P©NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ĆNNNNNNNNNNNNNNNNNNNNNN”””ū ¶( Start of polygon with EDGE³@RFš¼ < -0.5, -2, -2, -1, -3, -1, 1, -3, -1, 0.5, -2, -1 ¶ŽG Nozzle³@@Rś¼  0, 0, 7 ¶( End of third polygon³@ @½³Ž ±NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žņNNNNNNNNNNNNNNNNNNNNNN”””ū’’’’*@ĀĀ’’’’ļÖD’’žų$ųFŒ’’’ģ’ūL0Ž šĘ ’’’Ų’’’Ä(0Ę 6PĘ <€’’’¼F D ’ūV ’ū’’’õ’ū` ’ūn ’ū’ūt’ūz’ū|’’’ļ’ū‚æ"NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž4üNNNNNNNNNNNNNNNNNNNNNN”””ū’ūˆB’ūšĚ B¦’’’é’ūŖ’’’čB®’ū²BĄ’ūĪ’ūŌ’ūŲ’’’ā’ūā’ūź ’ūš!’ūö"’ūž#’ū’’’Ü’ū %’ū&’ū'’ū (’ū$)’ū.’’’Ö’ū8+’ūD)gNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žĶNNNNNNNNNNNNNNNNNNNNNN”””ū,’ūN-BX.’ūb/Bh’’’Š’ūn1’ūt2’ūz3’ū†4BŠ5’ū–’’’Ź’ūš’’’ÉB ’’’Č’ū¦’’’Ē̬’’’ĘB¶;’ū¼<’ūÄ=’ūŹ>’ūŠ?’ūÖ’’’Ą’ūąA’ūęoerce$ FNFide_exists destinatiof$F+NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žRžNNNNNNNNNNNNNNNNNNNNNN”””ūNAskFile$XIOopsSource$ FNFile_exists Destination$FNAskMessageBombed X_gdu_max Y_gdu_max FNData_pointText$CsizeYLorgAnglePolygonPolygonsSideSidesPenDxDy Define_deltas Define_deltasTempNewPreviousScreenXminXmaxXrang’”NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žaÆNNNNNNNNNNNNNNNNNNNNNN”””ūeYminYmaxYrangeDecadeUnitsPerMantissaExponent TemperatureRotation New_curve New_curveSpinSpinDeltaDelta FNIntensityLem Pen_controlLemRoomDeskChair BookshelfTableObject$RoomDeskChair BookshelfTableObjectsĆyNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žų8NNNNNNNNNNNNNNNNNNNNNN”””ū@& ¼ ¶Ž( Make arrays start at one³@D&¼6€ €£7Ž€€£8Ž€€£9Ž€€£:Ž€€¤³@D 6Ķ£7Ķ£8Ķ£9Ķ£:ͤ³Ž@4(»"¶(' Initialize various graphics parameters³@442ƒµŽINTERNAL»#¶( Use the internal screen³Ž@*4<»¶(v>NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žĖ NNNNNNNNNNNNNNNNNNNNNN”””ū Display the graphics screen³Ž@6*F€µ1ŽxŠė‹»¶Ž( Need isotropic units for a map³@(6P6Ķ»D»E¶Ž( Draw outline of room³@*(Z»)¶( Set degrees mode for angles³Ž@*d ;¤¶( What to draw?³Ž@2n;µ2Ž ***STOP***ö» ³Že ¶Ž( Until done...³Ž@.2 x  ££xųNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žžZNNNNNNNNNNNNNNNNNNNNNN”””ū¤¶( Read where and at what angle³@.. ‚ »¶( Move in unrotated coordinates³Ž@(. Œ» ¶Ž( Set rotation for RPLOTs³Ž@( –;» ¶Ž(³Ž@"  »޶Ž(µ2Desk»»for ³Ž@B" Ŗµ8?Ąµ8?Ąµ8?Ą»<¶/ 87.5% gray: dark gray³Ž@B “7Ķ»D»G³Ž@$ Ā NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž­kNNNNNNNNNNNNNNNNNNNNNN”””ū¾»ŽD»Gµ2Chair»»޳Ž@D$ ȵ?ąµ?ąµ?ą»<¶( 50% gray: half-and-half³Ž@D Ņ8Ķ»D»G³Ž@( Ü»ŽD»Gµ2 Bookshelf»»Ž»³Ž@( ę9Ķ»D»C»G³@$ š»ŽD»Cµ2Table»»Ž»޳Ž@($ ś€€€»<¶Ž( 100% gray scale: Black³@( ć|NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž½UNNNNNNNNNNNNNNNNNNNNNN”””ū:Ķ»D»B»C»G³Ž@  »³@  ;¤³@ "»ŽD»B³ŽĄ:,<¼, 0,60,-2, 0,100,-1, 120,100,-1, 120,30,-1³Ž@6:6¼+ 120,20,-2, 120,0,-1, 40,0,-1, 40,25,-1³@6@¼ 0,25,-1, 0,50,-1³ĄLJ=¼> 0,0,11, 0,0,-2, 20,0,-1, 20,-10,-1, 0,-1eNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ŽdNNNNNNNNNNNNNNNNNNNNNN”””ū0,-1, 0,0,7³Ž@JLT¼> 0,0,10, 2,-10,-2, 2,-10.5,-1, 3,-10.5,-1, 3,-10,-1, 0,0,7³Ž@JJ^¼> 0,0,10, 17,-10,-2, 17,-10.5,-1, 18,-10.5,-1,18,-10,-1, 0,0,7³ŽĄBJh>¼4 0,0,11, -3,9,-2, 3,9,-1, 4,8,-1, 3,2,-1³Ž@&Br¼ -3,2,-1, -4,8,-1,1‘NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž Ū7NNNNNNNNNNNNNNNNNNNNNN”””ū 0,0,7³Ž@J&|¼> 0,0,10, -4,1,-2, 4,1,-1, 4,0,-1, -4,0,-1, 0,0,7³ŽĄ6J†?¼) 0,0,-2, 20,0,-1, 20,-4,-1, 0,-4,-1³Ą86@¼* 0,0,-2, 25,0,-1, 25,-12,-1, 0,-12,-1³ŽĄ*8šA¼ Chair, 14,75,90 ¶* \³Ž@H*¤¼ Desk,  šNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž čNNNNNNNNNNNNNNNNNNNNNN”””ū 1,65,90 ¶*" > Upper left corner of the room³Ž@(H®¼ Table, 1,99,0 ¶* /³Ž@&(ø¼ Bookshelf,27,99,0 ¶*/³@(&¼ Chair, 66,44,30 ¶* \³Ž@<(̼ Desk, 50,50,30 ¶* > Center of the room³@(<Ö¼ Chair, 45,65¹NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž q‘NNNNNNNNNNNNNNNNNNNNNN”””ū,210 ¶* /³Ž@&(ą¼ Desk, 60,58,210 ¶*/³@&&ź¼ Bookshelf,41,5,0 ¶*\³@@&ō¼ Bookshelf,62,5,0 ¶* > Bottom center of room³Ž@&@ž¼ Bookshelf,83,5,0 ¶*/³@&&¼ Chair, 6,26,0 ¶*\³@(&¼ Chair, 16,26g2NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž B NNNNNNNNNNNNNNNNNNNNNN”””ū,0 ¶* \³Ž@B(¼ Chair, 26,26,0 ¶* > Four chairs by west door³@(B&¼ Chair, 36,26,0 ¶* /³Ž@((0¼ Chair, 63,96,220 ¶* \³Ž@H(:¼ Chair, 85,83,3 ¶*# > Four chairs by northeast tables³@(HD¼ Chair, 112$NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žóNNNNNNNNNNNNNNNNNNNNNN”””ū,83,0 ¶* /³Ž@&(N¼ Chair, 100,83,355 ¶*/³@(&X¼ Table, 68,99,0 ¶* \³Ž@D(b¼ Table, 94,99,0 ¶* > Two tables in upper right³Ž@(Dl¼ Chair, 105,50,270 ¶* \³Ž@F(v¼ Desk, 119,60,270 ¶* > Desk and chai'NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž$ĀNNNNNNNNNNNNNNNNNNNNNN”””ūr by east door³Ž@F€¼ ***STOP***³@ н³Ž Ē{NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žuxNNNNNNNNNNNNNNNNNNNNNN”””ū’’’’ p@ĀĀ’’’’õD’’Z V4& j4LŒ’’’ģ’ūL0Ž šĘ ’’’Ų’’’Ä(0Ę 6PĘ <€’’’¼F D ’ūV ’ū’’’õ’ū` ’ūn ’ū’ūt’ūz’ū|’’’ļ’ū‚ė“NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žFINNNNNNNNNNNNNNNNNNNNNN”””ū’ūˆB’ūšĚ B¦’’’é’ūŖ’’’čB®’ū²BĄ’ūĪ’ūŌ’ūŲ’’’ā’ūā’ūź ’ūš!’ūö"’ūž#’ū’’’Ü’ū %’ū&’ū'’ū (’ū$)’ū.’’’Ö’ū8+’ūD)gNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žNNNNNNNNNNNNNNNNNNNNNN”””ū,’ūN-BX.’ūb/Bh’’’Š’ūn1’ūt2’ūz3’ū†4BŠ5’ū–’’’Ź’ūš’’’ÉB ’’’Č’ū¦’’’Ē̬’’’ĘB¶;’ū¼<’ūÄ=’ūŹ>’ūŠ?’ūÖ’’’Ą’ūąA’ūęB’ūīC’ūōD’ūüEI³NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž +NNNNNNNNNNNNNNNNNNNNNN”””ū’ū’’’ŗ’ūG’ūH’ū ide_exists destinatiof$FNAskFile$XIOopsSource$ FNFile_exists Destination$FNAskMessageBombed X_gdu_max Y_gdu_max FNData_pointText$CsizeYLorgAnglePolygonPolygonsSideSidesPenDxDy Define_deltas€÷NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž¹¼NNNNNNNNNNNNNNNNNNNNNN”””ū Define_deltasTempNewPreviousScreenXminXmaxXrangeYminYmaxYrangeDecadeUnitsPerMantissaExponent TemperatureRotation New_curve New_curveSpinSpinDeltaDelta FNIntensityLem Pen_controlLemRoomDeskChair BookshelfTableObjŌ NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŠNNNNNNNNNNNNNNNNNNNNNN”””ūect$RoomDeskChair BookshelfTableObjectsArrayLetterPointsFLAX@( ¼ ¶Ž# Make the arrays start at 1³@6(¼B€€¤¶# Set aside space for the array³Ž@46»"¶#' Initialize various graphics parameters³@44(ƒµšņNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žߎNNNNNNNNNNNNNNNNNNNNNN”””ūŽINTERNAL»#¶# Use the internal screen³Ž@&42»¶# Turn on graphics screen³Ž@0&<µ!Ž#µ!ėµ!Ž»¶# Isotropic scaling³Ž@*0FC„°Žµ!ėµ¶Ž# Four letters total³@.* P D¤¶# How many points in this letter?³Ž@@. Z»uBĪD»wƒ»w»x¶#" Adjust thĢZNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žģļNNNNNNNNNNNNNNNNNNNNNN”””ūe array size accordingly³Ž@2@ d Bͤ¶Ž#" Read the correct number of points³Ž@62 nC†ģ€»¶#$ Move to lower-left corner of letter³Ž@ 6 xBĶ»D»F¶Ž# Draw letter³Ž@ ‚“ŽCD»F¶Ž¶Ž# et cetera³ŽĄR ŒE¼ D 10, 0,5,-1, 5,0,-1, 0,-1,-1, -4,HĶNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žüŃNNNNNNNNNNNNNNNNNNNNNN”””ū0,-1, 0,-1,-1³Ž@PR–¼ D 3,0,-1, 0,-1,-1, -3,0,-1, 0,-2,-1, -1,0,-1³ŽĄRP F¼ D 6, 0,5,-1, 1,0,-1, 0,-4,-1, 4,0,-1, 0,-1,-1³Ž@RŖ¼  -5,0,-1³ŽĄR“G¼ E 12, 2,5,-1, 1,0,-1, 2,-ā—NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ĻąNNNNNNNNNNNNNNNNNNNNNN”””ū5,-1, -1,0,-1, -.4,1,-1³@PR¾¼ D -2.2,0,-1, -.4,-1,-1, -1,0,-1, 1.8,2,-2, .7,2,-1³Ž@(Pȼ  .7,-2,-1, -1.4,0,-1³ĄR(ŅH¼ E 12, 1.9,2.5,-1, -1.9,2.5,-1, 1,0,-1, 1.5,-2,-1, 1.5,2,-1³@PRܼ E 1,0~īNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž š³NNNNNNNNNNNNNNNNNNNNNN”””ū,-1, -1.9,-2.5,-1,1.9,-2.5,-1, -1,0,-1, -1.5,2,-1³@&Pę¼  -1.5,-2,-1, -1,0,-1³@&š½¶Ž# Finis³Ž oHNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ©‚NNNNNNNNNNNNNNNNNNNNNN”””ū’’’’ą@ĀĀ’’’’č D’’’ĘčŖŚč^Œ’’’ģ’ūL0Ž šĘ ’’’Ų’’’Ä(0Ę 6PĘ <€’’’¼F D ’ūV ’ū’’’õ’ū` ’ūn ’ū’ūt’ūz’ū|’’’ļ’ū‚‹GNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž 0NNNNNNNNNNNNNNNNNNNNNN”””ū’ūˆB’ūšĚ B¦’’’é’ūŖ’’’čB®’ū²BĄ’ūĪ’ūŌ’ūŲ’’’ā’ūā’ūź ’ūš!’ūö"’ūž#’ū’’’Ü’ū %’ū&’ū'’ū (’ū$)’ū.’’’Ö’ū8+’ūD)gNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž $NNNNNNNNNNNNNNNNNNNNNN”””ū,’ūN-BX.’ūb/Bh’’’Š’ūn1’ūt2’ūz3’ū†4BŠ5’ū–’’’Ź’ūš’’’ÉB ’’’Č’ū¦’’’Ē̬’’’ĘB¶;’ū¼<’ūÄ=’ūŹ>’ūŠ?’ūÖ’’’Ą’ūąA’ūęB’ūīC’ūōD’ūüEI³NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žVwNNNNNNNNNNNNNNNNNNNNNN”””ū’ū’’’ŗ’ūG’ūH’ū I’ū JBK’ū’’’“’ū M’ū.N’ū8O’ū<P’ūBQ’ūR’’’®’ū\S’ūbT’ūdU’ūpV’ūtW’ūx’’’Ø’ū„Y’ūˆZ’ūŒide_exists destinatiof$FNAskFile$XI^ÅNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žeFNNNNNNNNNNNNNNNNNNNNNN”””ūOopsSource$ FNFile_exists Destination$FNAskMessageBombed X_gdu_max Y_gdu_max FNData_pointText$CsizeYLorgAnglePolygonPolygonsSideSidesPenDxDy Define_deltas Define_deltasTempNewPreviousScreenXminXmaxXrangeYminYmaxYóMNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žBHNNNNNNNNNNNNNNNNNNNNNN”””ūrangeDecadeUnitsPerMantissaExponent TemperatureRotation New_curve New_curveSpinSpinDeltaDelta FNIntensityLem Pen_controlLemRoomDeskChair BookshelfTableObject$RoomDeskChair BookshelfTableObjectsArrayLetterPointsFLAX|{NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žqyNNNNNNNNNNNNNNNNNNNNNN”””ūHorizonTreeTree2 Sun_diameter Sun_deltaPhiBirdPosition_angleDistanceThetaR Left_angleX2Y2 Right_angleX3Y3Size@  ¼ ¶Ž1 Arrays start at 1.³@@ ¼I€€£JŽ€€£KŽ€€¤¶1 For PLOT, RPLOT³Ž@,ģNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž$*NNNNNNNNNNNNNNNNNNNNNN”””ū@»"¶1 Initialize graphics parameters³@4,(ƒµŽINTERNAL»#¶1 Use the internal screen³Ž@&42»¶1 Turn on graphics screen³Ž@*&<€µ1Ž’€µ1Ž…»¶1 1 UDU = 1 pixel³Ž@4*FµAo4T½¶1 "Looks better" than default³Ž@T4P¶ŽH Draw sunrise-------XNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žNNNNNNNNNNNNNNNNNNNNNN”””ū----------------------------------------------------³Ž@*TZLµ!ސ¶1 Diameter of outer layer³Ž@**dM†¶1 Shrinkage of each brightness³@$*nµ1µ1¾»¶1 Center of sun³Ž@>$x µ!큁µ!Žķ°Žter of¶Ž1 All non-black gray shades³Ž@,> ‚ »<¶Ž1 Def ÉNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŽŒNNNNNNNNNNNNNNNNNNNNNN”””ūine dithered gray shade³@2, Œ»DLµ!µ! ģźüMģčµ!Ž»B»>¶< Draw sun³@"2–“Ž µ!µ!¶Ž1 and so forth³@T" ¶ŽH Draw horizon-----------------------------------------------------------³Ž@0TŖIȀ¶Ž1 \ Lower left corner of screen,³@.0“‚IȀ¶Ž1˜MNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž½½NNNNNNNNNNNNNNNNNNNNNN”””ū / for blacking bottom of sun³@..¾µ1Ž’µ!ƒźü퐶1 Delta X for horizon³Ž@$.Č 됶Ž1 Starting point for X³@0$Ņ ‚µ!° Start¶Ž1 All except end points³Ž@0 Ü 萶1 Increment X³Ž@& ę IČ ¶Ž1 Put it in the array³Ž@6& š ‚Iȵ1¹æŠģ萶Ž1 Randoŗ.NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žčīNNNNNNNNNNNNNNNNNNNNNN”””ūm height for roughness³Ž@"6ś“Ž µ1¹æ¶Ž1 and so forth³@6"µ!Iȵ1Ž’¶1 \ Lower right corner of screen³@06µ!‚IȀ¶1 / for blacking bottom of sun³@0€€€»<¶Ž1 Black³Ž@*"IĶ»D»B»E¶1 Erase bottom of sun³Ž@ *,»¶1 PLOT left pen dow6NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŪßNNNNNNNNNNNNNNNNNNNNNN”””ūn³@: 6 ‚µ!ź°T left¶Ž1 \ Draw the horizon polygon,³Ž@4: @ IČ ‚IČ»&¶Ž1 > but don't include first³Ž@44J“Ž ‚IČ»¶Ž1 / and last points (corners).³@T4T¶ŽH Draw clouds------------------------------------------------------------³Ž@0T^‚ė÷NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žĖįNNNNNNNNNNNNNNNNNNNNNN”””ū‚µ!Žėµ!Ž»¶1 Anisotropic scaling³Ž@:0hµ(?е(?е(?Š»<¶1 25% gray shade³@$:r Š°Žµ(¶Ž1 10 ellipses³Ž@4$ |æµ?陙™™™šī„ģ‚źæˆģ»¶Ž1 Random position³Ž@84 †»D济?陙™™™šģ»B»>¶Ž1 random size, fill it³@"8“Ž µŽĪ¬NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ųŠNNNNNNNNNNNNNNNNNNNNNN”””ū?鶎1 and so forth³@2"š€µ1Ž’€µ1Ž…»¶1 Back to 1 UDU = 1 pixel³Ž@T2¤¶ŽH Draw birds-------------------------------------------------------------³Ž@$T®»)¶1 Angular mode: Degrees³Ž@,$øNµ!ŽF¶1 Arc subtended by each wing³@(,ĀOŠ°Ž¶1 A¶Ž1ĒźNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ­ƒNNNNNNNNNNNNNNNNNNNNNN”””ū Ten birds enough³@4( ĢPæµ1Žh쐶Ž1 Bird's direction from 100,300³Ž@44 ÖQææµ!ŽF쐶Ž1 Bird's distance from 100,300³@,4 ą ‹QPæģ萶1 Bird's actual X position³@0, źµ1Ž,QPæģ萶1 Bird's actual Y position³@$0 ōRæµ!ŽģŠź¶Ž1 Bird's tilt³Ž@2$ žł®NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ž²NNNNNNNNNNNNNNNNNNNNNN”””ūSæŠģŠč¶Ž1 Radius of arcs of birds' wings³@<2 Tµ1Ž“µ!ZN‚ķźüčR萶1 Direction of left arc's center³@2< U STæģ萶1 Center of left wing's arc (X)³Ž@22 VSTæģ萶1 Center of left wing's arc (Y)³Ž@*2 &€» ¶Ž1 Unrotated coords for MOVE³Ž@"* 0UV»ŲŽNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž %NNNNNNNNNNNNNNNNNNNNNN”””ū¶1 Left arc's center³Ž@6" :Rµ!ŽZčN‚ķź» ¶Ž1 Rotated coords for POLYLINE³Ž@06 DSµ!Ž<µ!“Ž µ! ź¶Ž1 / left half.³@ $Hµ1Ž“¶1 Starting value³@. R€$NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŻ•NNNNNNNNNNNNNNNNNNNNNN”””ūŠņ» ¶1¶Ž1 For a few iterations...³Ž@@. \ µ1“ķüī‚ķ°Žor a f¶Ž1 No. of trees dependent upon Y³Ž@&@ fVæµ!Ž쐶Ž1 Random variation³@6& pæµ1’ģVčµ!ź»¶Ž1 Bottom of center of tree³@B6 zZµ1ŽČVčüźüµ?¹™™™™™šģ¶Ž1 Size of tree dependent upL:NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žˆĘNNNNNNNNNNNNNNNNNNNNNN”””ūon Y³Ž@.B „KĪJĪZ»Ž»y¶1 Scale tree appropriately³@*. ŽKĶ»D»B»G¶1 FILL, but don't EDGE³@"* ˜“Ž D»B»¶Ž1 and so forth³@0" ¢µ?陙™™™šģ¶Ž1 Go lower on the screen³@"0¬»Ž?陙¶Ž1 for a while...³@"¶½¶Ž1 Finis³Ž p1NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž»÷NNNNNNNNNNNNNNNNNNNNNN”””ū’’’’D@ĀĀ’’ vD’’† ~ p~mŒ’’’ģ’ūL0Ž šĘ ’’’Ų’’’Ä(0Ę 6PĘ <€’’’¼F D ’ūV ’ū’’’õ’ū` ’ūn ’ū’ūt’ūz’ū|’’’ļ’ū‚cōNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž"`NNNNNNNNNNNNNNNNNNNNNN”””ū’ūˆB’ūšĚ B¦’’’é’ūŖ’’’čB®’ū²BĄ’ūĪ’ūŌ’ūŲ’’’ā’ūā’ūź ’ūš!’ūö"’ūž#’ū’’’Ü’ū %’ū&’ū'’ū (’ū$)’ū.’’’Ö’ū8+’ūD)gNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žQNNNNNNNNNNNNNNNNNNNNNN”””ū,’ūN-BX.’ūb/Bh’’’Š’ūn1’ūt2’ūz3’ū†4BŠ5’ū–’’’Ź’ūš’’’ÉB ’’’Č’ū¦’’’Ē̬’’’ĘB¶;’ū¼<’ūÄ=’ūŹ>’ūŠ?’ūÖ’’’Ą’ūąA’ūęB’ūīC’ūōD’ūüEI³NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žDNNNNNNNNNNNNNNNNNNNNNN”””ū’ū’’’ŗ’ūG’ūH’ū I’ū JBK’ū’’’“’ū M’ū.N’ū8O’ū<P’ūBQ’ūR’’’®’ū\S’ūbT’ūdU’ūpV’ūtW’ūx’’’Ø’ū„Y’ūˆZ’ūŒ[’ū’\B–]’ū¢’’’¢’ūØ“NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žw3NNNNNNNNNNNNNNNNNNNNNN”””ū’’’”B®’’’ ’ūø’’’ŸÄš¾b’ūĀc’ūČd’ūŅe’ūŲf’ūÜ’’’™’ūäh’ūźoerce$ FNFide_exists destinatiof$FNAskFile$XIOopsSource$ FNFile_exists Destination$FNAskMessageBombed X_gdu_max Y_gdu_max FNData_pointText$C5ŌNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žg NNNNNNNNNNNNNNNNNNNNNN”””ūsizeYLorgAnglePolygonPolygonsSideSidesPenDxDy Define_deltas Define_deltasTempNewPreviousScreenXminXmaxXrangeYminYmaxYrangeDecadeUnitsPerMantissaExponent TemperatureRotation New_curve New_curveSpinSpinDeltaDčNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž T@  ¼3 24,3,-1, 24,12,-1, 3,12,-1, 0,0,7³@F>Ŗ\µ2ސ¶5 In case anycŒNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žĶ«NNNNNNNNNNNNNNNNNNNNNN”””ūthing is left in COM from the last run...³@F“dfŌµ1ŽØæÕ^ĶÕ²¶Ž( \³@B¾dfŌµ1Ž©æÕ_ĶÕ²¶Ž(& > Replace unneeded characters with³Ž@8BČdfŌµ1ŽŖæÕ`ĶÕ²¶Ž( / User-Defined Characters³@8ŅdfŌµ1Ž«æÕaĶÕ²¶Ž( /³Ž@ Ü»"³@4 ꃵŽINTERNAL»¢5NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žžšNNNNNNNNNNNNNNNNNNNNNN”””ū#¶( Use the internal screen³Ž@ 4š»³@ ś€Šµ?ąėŠ»³@ »)³@ ½³Ž@ Š‚ė°ŽėгŽ@  "»³Ž@ ,dg€µ!ŽZµ!Z°³Ž³(³Ž@  6‚»³Ž@ @dg»³@ JŠźŠź»³@@ TdhŌµ2Ž Chars: 'µ1ŽØæµ1©æµ1Ŗæµ1«æµ2 'ūūūūūÕ²³@@ ^ ¹NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŁ”NNNNNNNNNNNNNNNNNNNNNN”””ū“Žg2Ž C³Ž@h“Ž2Ž C³Ž@ r½³Ž@T |¶ŽH ***********************************************************************³ŽĄ†ĀT@ ’’$ŹXT¾ ’ūB’ūĚ’ū’’’ūB ’’’ś…NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žź„NNNNNNNNNNNNNNNNNNNNNN”””ū’ū,’’’łÄš2’ū8 ’ū< ’ū@ New_udcNew_udcChar$ArrayUdc Old_chars$SizeCharsPosRowColumn³Ž@R¶ŽG This allows up to twenty new characters to be defined, each having up³@DRš¶Ž‘oNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žæöNNNNNNNNNNNNNNNNNNNNNN”””ū8 to thirty elements (rows in the array) for definition.³Ž@ D¤¼ ³Ž@, ®¼³Ž @ޣހ£ Ž€€€¤³@,øæ µ!Žń·£³Ž@0 Ā›µ2Ž"User-defined Character table full.¤³@0ĢøŽ2Ž"¶Ž (still room)³@ Öæ č³@  ą’³@ źĒ΁ĄÜ NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŒĒNNNNNNNNNNNNNNNNNNNNNN”””ū³Ž@ ō ǰސ³Žst³Ž@ ž ƒ°ŽŽ³Ž³Ž@ É Ȑ³Ž@ “Ž É Ȑ³Ž@ “Ž É Ȑ³Ž@&¹¶ (room left?)³@0±³@T:¶ŽH ***********************************************************************³ŽĄDĀ’’ś† ’’nrųtČnNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žPNNNNNNNNNNNNNNNNNNNNNN”””ūzš’ūB’ū ’ūB’’’ū’ū’’’śÄš(’ū.’ū4 ’ū: ’ū@ ’ūD’’’ō’ūH ’ūPBRcize Old_chars$CharsArrayrCLabelLabelText$UdcSize Old_chars$CharsArr įNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž&aNNNNNNNNNNNNNNNNNNNNNN”””ūayCharChar$PosRowColumnXY³Ž@RN¶ŽF This prints a character string at the current pen position and using³Ž@TRX¶ŽH the current LORG, LDIR and CSIZE. The LORG will need to be redeclared³Ž@TTb¶ŽH upon returQ»NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žs2NNNNNNNNNNNNNNNNNNNNNN”””ūning to the calling context, as this routine needs LORG 1 if³Ž@4Tl¶Ž( the text is longer than one character.³Ž@ 4v¼ ³Ž@, €¼³Ž @ޣހ£ Ž€€€¤³@,м €€¤³@”æ °Ž€¤³³Ž@D ž‚ń· °Ž»¶Ž#- Necessary when doing oncĢNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž@NNNNNNNNNNNNNNNNNNNNNN”””ūe character at a time³@D Ø ž³Ž@2 ²  æ ¶Ž/! Is this to be replaced by a UDC?³@2 ¼ · æ ³Ž@" Ę»uĪ Ē»wƒ»w»x¶8 \³Ž@0" Š  ǰŽ»wƒ»¶Ž8 \ Take a slice out³Ž@,0Ś ƒ°ŽŽ»w¶Ž8 > of the 3D array³@,,ä Č ɐ¶Ž8 / and õyNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žP=NNNNNNNNNNNNNNNNNNNNNN”””ūput it in the³@(,ī“Ž ɐ¶Ž8 / 2D array for³Ž@"( ų“Ž ɐ¶Ž8 / SYMBOL.³@"  »A³Ž@  »DĶ»@³Ž@   »³@L  » µ2Ž#,Kœžµ2Ž ¤¶Ž#- Tell the computer to update the pen position³@&L *øŽ µ2޶Ž (regular character)³Ž@& 4» µ2ŽONNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž c NNNNNNNNNNNNNNNNNNNNNN”””ū#,Kœž ¤³@, >¹¶! (this character been redefined?)³@,H“Ž (this³Ž@R±³ 8›NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž 6_NNNNNNNNNNNNNNNNNNNNNN”””ūĘIAXlD$A/B PHYREC Rev A 9/18/81 |d „’ i¦Š““Ģ¢ ¶“œš˜¦¤¢®N&ddBdNVN^Nu?,PHYREADPHYWRITE "ŻNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž nNNNNNNNNNNNNNNNNNNNNNN”””ūP€ékׄ3'NVN^ _ßü NŠNV0. S@ć@0{Nū€$@P?<»NŗD?<Nŗ|H#|’’’B|I/.’ü/(/(J­×®g/-×® m×ŖN8śŲVĄīJg n’^/(NŗfNśt-n’ü’Z n’^"n’Z#h >|H#|’’’:|’G/.’ü/(/(J­×¶g/-×¶ mײN-n’ü’Z n’ZJ(Hc/(>HxżŅJ­×ŽgÜĪNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žÉŖNNNNNNNNNNNNNNNNNNNNNN”””ū/-׎ m׊N|’b+o’ößü Nś.,_+_’ö0-’žHĄüčH@rP²@VĄ€.’cg.m’öNu|’c`ž¼Nś n’dJØg/( hNN^NuNV’üp °xųän>p °xųäfY/<Nŗn-_’ü!ī’üłJ n’üL­ÖōHØAśž.+HÖōB­ÖųNŗü’N^NuNVN^NuNł’…€PNł’…€p °xfY/<Nŗ-_’ü!ī’ü` n’üL­ÖōHØAśž.+HÖōB­ÖųNŗ’’’’L@ĀĀ’’’’ł“0’’v:ęDR¢NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž«!NNNNNNNNNNNNNNNNNNNNNN”””ūę:0lĘ D€’’’ŲF 0VĘ P€’’’ŠF €’’’ČF 4€’’’ĄF €’’’øF *€’’’°F 0BĘ >!’’üą€’’üŲF \€’’üŠF fsedPefStar Position DirectiofDiameteRadiusUsedPenStarPosition DirectionDiameterStars CirzNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žžrNNNNNNNNNNNNNNNNNNNNNN”””ūcles_in Circles_out Selection Max_radius@  »"³@ ƒµŽINTERNAL»I³@µ! ėµ!Ž µ! ėµ!Ž »³@ (»³@ 2»³@ < ³@ F ¬Ž³Ž@ P» ³@ Zµ!€€€»M³@ d‚µ!°’šL³Ž@ n»M³Ž@ xĖųNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žĶCNNNNNNNNNNNNNNNNNNNNNN”””ūź€€€»M³Ž@ ‚“Ž’š³Ž@ Œ»M³Ž@–»Žš³ŽĄL ¶Ž>--------------------------------------------------------------³Ž@LŖµ!ސ³@ “³@ ¾» ³@ Č»H³Ž@ Ņ»D»B»>³@  ܁萳@ ęµ!Žń·³@ šµ(?īfffffg쐪NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žTŌNNNNNNNNNNNNNNNNNNNNNN”””ū³Ž@śµŽ?¹™™™™™šó»ڳŽ@ ŗ³ŽĄJ ¶Ž=-------------------------------------------------------------³@Jµ!ސ³@"µ!ސ³@ ,» ³@ 6»H³Ž@ @»D»B»>³@  Jź³@ T€ń·µ!ސ³@ ^µ(?īfffffg쐳Ž@hµŽ?¹™™™™™šéNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žgåNNNNNNNNNNNNNNNNNNNNNN”””ūó»ƳŽ@ rŗ³ŽĄP |¶ŽB -----------------------------------------------------------------³Ž@P†¼ %g¤³@ Ī€»{»y³@ š»)³@ ¤µ!2°’ą0³Ž@  ®» ³@ øæµ8Ž@v€ģ搳Ž@ Ā Ēś»ŽܳŽ@  Ģ ǁ³@ Öæƒģ³Ž@ ąæµBNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž2¶NNNNNNNNNNNNNNNNNNNNNN”””ū!Žģæč³Ž@ ź …æˆģ萳Ž@  ō» ³@ žæģæģ»³@  »³Ž@ »H³Ž@  ó·Ŗ³Ž@  &€€» ³@ 0øŽгŽ@ :»Dµ?tzįG®{숻B»>³@ D¹³@ Nµ8?šĢĢĢĢĢĶ쐳Ž@  Xč³@ bµ!Žń·³@ lµ!Žņ»T³Ž@v“Ž’ą҆ENNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž‡NNNNNNNNNNNNNNNNNNNNNN”””ū³Ž@ €ŗ³Ž@ н³ŽŠhont_edge/550 PRINT TABXY(31,1);"Back edge: ";Back_edgeeK560 PRINT TABXY(61,1);"Opaque: ";RPT$("Yes",Opaque)&RPT$("No",NOT Opaque)l!570 FOR Sfc=1 TO 2-(NOT Opaque)"580 Topside=(Sfc=1)O590 Bottomside=NOT TopėŠNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž¹NNNNNNNNNNNNNNNNNNNNNN”””ū/10 SUB Dump_graphics(OPTIONAL Dev_selector_)&C20 OPTION BASE 1 ! Arrays start at 1P30 INTEGER X_pixels,Y_pixels,Words_per_row,Row,Column,Index ! Speed it up...940 DIM Pad$[45] ! PaMµNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž "ˆNNNNNNNNNNNNNNNNNNNNNN”””ūddingIM50 IF NPAR=1 THEN ! Is output device specified?.?60 Dev_selector=Dev_selector_ ! If so, use iti<70 ELSE ! Otherwise,@80 Dev_selector=701 hōNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž wŪNNNNNNNNNNNNNNNNNNNNNN”””ū ! Default to 701 90 END IFA100 IF ABS(RATIO-1.31362467866)<1.E-9 THEN ! 512x390 pixels?e110 X_pixels=512120 Y_pixels=390 130 ELSE140 X_pixels=400150 Y_pixels=300 160 END IFL170 Words_per_row=X_pixels/16 ŅNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž DźNNNNNNNNNNNNNNNNNNNNNN”””ū ! How many integers per row?K180 ALLOCATE Hi$[Y_pixels],Lo$[Y_pixels] ! High- and low-order bytes?I190 ALLOCATE INTEGER Screen(0:Y_pixels*Words_per_row-1) ! Screen arrayeL200 Pad$=RPT$(CHR$(0),45) ! 45 nulls„ßNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž Ż}NNNNNNNNNNNNNNNNNNNNNN”””ū centers the imageC210 GSTORE Screen(*) ! Store the picturetO220 Esc$=CHR$(27)&"K"&CHR$((Y_pixels+45) MOD 256)&CHR$((Y_pixels+45) DIV 256).8230 OUTPUT Dev_selector USING "K";CHR$(27)&"A"&CHR$(8)%240 FOR Column=0 TO WordX'NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž īLNNNNNNNNNNNNNNNNNNNNNN”””ūs_per_row-1H'250 FOR Row=Y_pixels-1 TO 0 STEP -1$(260 Index=Column+Row*Words_per_row8270 Hi$[Y_pixels-Row]=CHR$(INT(Screen(Index)/256))7280 Lo$[Y_pixels-Row]=CHR$(Screen(Index) MOD 256))290 NEXT Row3300 OUTPUT Dev_selec?€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž»NNNNNNNNNNNNNNNNNNNNNN”””ūtor USING "K";Esc$&Pad$&Hi$23310 OUTPUT Dev_selector USING "K";Esc$&Pad$&Lo$2320 NEXT Columnv 330 SUBEND’’ls-Row]=CHR$(INT(Screen(Index)/256))7280 Lo$[Y_pixels-Row]=CHR$(Screen(Index) MOD 256))290 NEXT Row3300 OUTPUT Dev_selecÕCNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žˆ.NNNNNNNNNNNNNNNNNNNNNN”””ūP10 ! ************************************************************************F20 Contour: SUB Contour(Sfc(*),Min,Max,Interval,Extremes,Stats,Crt)P30 !------------------------------------------------------------------------!P40 ! ©żNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žÆ NNNNNNNNNNNNNNNNNNNNNN”””ū Copyright 1983, Hewlett-Packard Company !P50 ! All Rights Reserved !P60 ! !P70 ! This subprogram pn÷NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žœNNNNNNNNNNNNNNNNNNNNNN”””ūlots a contour map of the array Sfc(*), and !P80 ! optionally plots local minima, maxima, and statistics. !P90 ! !P100 ! Sfc(*): This is the two-ļXNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žÉBNNNNNNNNNNNNNNNNNNNNNN”””ūdimensional real array containing the !P110 ! data to be plotted. It need not be square. !P120 ! Min & Max: These are the lowest and highest levels, respectively, !P130 ! of the contour lines. TheĘNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žśsNNNNNNNNNNNNNNNNNNNNNN”””ūse allow you to specify the !P140 ! exact range within which you want contours. Every !P150 ! contour line outside of this range will not be plotted. !P160 ! Interval: This specifies how far apart the conÕųNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žcäNNNNNNNNNNNNNNNNNNNNNN”””ūtour lines have to !P170 ! be (in value, not in distance). The smaller the inter- !P180 ! val, the denser the contour plot. !P190 ! Extremes: This is a logical variable which specifies whe>DNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žPÕNNNNNNNNNNNNNNNNNNNNNN”””ūther or !P200 ! not to label local maxima and minima. A local maximum !P210 ! is a point whose value is larger that its eight !P220 ! neighbors immediately to the west, northwest, north, =~NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž†NNNNNNNNNNNNNNNNNNNNNN”””ū !P230 ! northeast, east, southeast, south, and southwest. A !P240 ! local minimum has a corresponding definition. !P250 ! Stats: This is a logical variable which specifies whether or !P260 Į&NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž6·NNNNNNNNNNNNNNNNNNNNNN”””ū! not to print the "stats" (statistics) of the data !P270 ! array. Stats include: 1) array size, rows and columns; !P280 ! 2) Minimum and maximum contour levels, and 3) contour !P290 ! S¼NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž&‰NNNNNNNNNNNNNNNNNNNNNN”””ū interval. !P300 ! Crt: Logical variable specifying whether the plot is going !P310 ! to a CRT or a plotter. !P320 !-------------------čxNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž øNNNNNNNNNNNNNNNNNNNNNN”””ū-----------------------------------------------------!330 INTEGER I,J,Imax,Jmax-340 IF Crt THEN 350 GINITT360 GRAPHICS ONm370 ALPHA OFFO 380 END IF390 Imax=SIZE(Sfc,1)400 Jmax=SIZE(Sfc,2)410 IF Stats THEN /420 ½NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž @ėNNNNNNNNNNNNNNNNNNNNNN”””ūCALL Gdu(X_gdu_max,Y_gdu_max,Xmid,Ymid)-m430 CALL Label(3,.6,0,5,1,Xmid,.04*Y_gdu_max,"Array has "&VAL$(Imax)&" rows and "&VAL$(Jmax)&" columns.")ū‹440 CALL Label(3,.6,0,5,1,Xmid,.02*Y_gdu_max,"Minimum: "&VAL$(Min)&"; Maximum: "&VAL$(Max)&"; Cof{NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž sŚNNNNNNNNNNNNNNNNNNNNNN”””ūntour interval: "&VAL$(Interval)&".")ū4450 VIEWPORT 0,X_gdu_max,.06*Y_gdu_max,Y_gdu_max 460 END IF470 Show(1,(Jmax),(Imax),1).480 CLIP 1,Jmax,Imax,1490 AXES 1,1,1,1,1,1,1500 AXES 1,1,Jmax,Imax,1,1,1510 Northeast=0 ! \8520 wŪNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž źMNNNNNNNNNNNNNNNNNNNNNN”””ūNorthwest=0 ! > Figure what to do for case 4.530 Cross=1 ! /540 FOR I=1 TO Imax-1/550 FOR J=1 TO Jmax-1 >560 Big=MAX(Sfc(I,J),Sfc(I,J+1),Sfc(I+1,J),Sfc(I+1,J+1))@570 Small=MIN(Sfc(I,J),Sfc(I,J+1),Sfc(I+1,J),Sfc(I+1,J–6NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž Ł|NNNNNNNNNNNNNNNNNNNNNN”””ū+1))+580 FOR Cont=Min TO Max STEP Interval(,590 IF Cont>Small AND ContMIN(Sfc(I,J),Sfc(I,J+1)) AND ContMIN(Sfc(I+1,J),Sfc(I+1,J+1)) AND ContMIN(Sfc(I,J),Sfc(I+1,J)) AND ContMIN(Sfc(I,J+1),Sfc(I+1,J+1)) AND Cont1040 Jtop=J+(Cont-Sfc(I,J))/(Sfc(I,J+1)-Sfc(I,J))G1050 v›NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žÅWNNNNNNNNNNNNNNNNNNNNNN”””ū Jbottom=J+(Cont-Sfc(I+1,J))/(Sfc(I+1,J+1)-Sfc(I+1,J)).?1060 Ileft=I+(Cont-Sfc(I,J))/(Sfc(I+1,J)-Sfc(I,J))(F1070 Iright=I+(Cont-Sfc(I,J+1))/(Sfc(I+1,J+1)-Sfc(I,J+1))$1080 IF Northeast THEN 1090 ßóNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž öfNNNNNNNNNNNNNNNNNNNNNN”””ū MOVE J,Ileft1100 DRAW Jtop,It$1110 MOVE Jbottom,I+1#1120 DRAW J+1,Iright1*1130 END IF ! (if northeast)$1140 IF Northwest THEN 1150 MOVE J,Ileft$1160 æøNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž £5NNNNNNNNNNNNNNNNNNNNNN”””ū DRAW Jbottom,I+11170 MOVE Jtop,Im#1180 DRAW J+1,Iright1*1190 END IF ! (if northwest) 1200 IF Cross THEN 1210 MOVE J,Ileft#1220 DRAW J+1,Irightt1230 ‚2NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž NNNNNNNNNNNNNNNNNNNNNN”””ū MOVE Jtop,Ii$1240 DRAW Jbottom,I+1&1250 END IF ! (if cross)1260 END SELECT1270 END IF1280 NEXT ContE1290 NEXT J 1300 NEXT I1310 IF Extremes>0 THEN 1320 Pen=4e1330 Imag“eNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  “NNNNNNNNNNNNNNNNNNNNNN”””ūe$="K"1340 FOR I=2 TO Imax-1 1350 FOR J=2 TO Jmax-1 :1360 Point=Sfc(I,J) ! (The point we're working on)t1370 Min=MIN(Sfc(I-1,J-1),Sfc(I-1,J),Sfc(I-1,J+1),Sfc(I,J-1),Sfc(I,J+1),Sfc(I+1,J-1),Sfc(I+1,J),Sfc(I+1,J+1))t1380 ÅNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž :¢NNNNNNNNNNNNNNNNNNNNNN”””ūMax=MAX(Sfc(I-1,J-1),Sfc(I-1,J),Sfc(I-1,J+1),Sfc(I,J-1),Sfc(I,J+1),Sfc(I+1,J-1),Sfc(I+1,J),Sfc(I+1,J+1))+1390 IF Point>Max OR PointMax THEN 41420 CAnNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žońNNNNNNNNNNNNNNNNNNNNNN”””ūLL Label(3,.6,0,5,Pen,(J),(I),"H")1430 ELSE41440 CALL Label(3,.6,0,5,Pen,(J),(I),"L")1450 END IF!1460 IF Extremes>1 THEN ,J1470 CALL Label(3,.6,0,5,Pen,J,I+.2,"") ! No label, just setup(1480 sdNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž\ĄNNNNNNNNNNNNNNNNNNNNNN”””ū LABEL USING Image$;Point1490 END IF1500 END IF1510 NEXT J1520 NEXT I1530 END IF ! (if Stats)1540 End: CALL Pause(1) 1550 SUBEND’’ CALL Label(3,.6,0,5,Pen,J,I+.2,"") ! No label, just setup(1480 u.NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž{ĪNNNNNNNNNNNNNNNNNNNNNN”””ū’’’’ p@ĀĀ’’  ’’ģ dh„ nØh d"A<0 €’’’ØEž"A2$"AF<"APH"AZT€’’’ Eś€’’’˜Eś€’’’Eś€’’’ˆEś €’’’€Eś&€’’’x B€’’’pF . Ę P€’’’hF 0"’’ž`2"’’ü˜l6"’’ū0x:"’’uµNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žH’NNNNNNNNNNNNNNNNNNNNNN”””ūłČ„>"A D"A H"’’ų`L Ę R"AZRĘ ^"’’öąœ`t I5JK@ SizeIndenSPBa1A2ATII1I2I3I4I5JKSizeIntenSPA1A2A3A4RG1G2A5 LetterG3AA6@ ƒµū NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž¬NNNNNNNNNNNNNNNNNNNNNN”””ūŽINTERNAL»I³@ »³@ »)³@2 (¼’’’’ )Ž€0怣(Ž€0怣(Ž€0怤³@J22¼’’’’)Ž€ €£(Ž€€£(Ž€ €£(Ž€ €£(Ž€€¤³@PJ<¼€€£Ž€€£Ž€€£Ž€€£Ž€€£Ž€€¤³@PPF¼ A 4,0,0“NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž.NNNNNNNNNNNNNNNNNNNNNN”””ū,4,-3,0,0,2,2,0,0,-2,1,0,0,3,-4,0,0,-4, 3,0,0,-2,-3,0,0,-1 ¶L9³@RPP¼ F 4,0,0,1,-3,0,0,2,2,0,0,-2,1,0,0,3,-3,0,0,2,2,0,0,-2,1,0,0,3,-4,0,0,-7³Ž@DRZ¼ 8 4,0,0,7,-4,0,0,-1,3,0,0,-2,-2,0,0,-1,2,0,0,-2,-3,0,0,-1³Ž@HDd¼ = 4,0,0,1,-3,0,0,2,2,0,0,-2,1,0,0Ÿ¶NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž· NNNNNNNNNNNNNNNNNNNNNN”””ū,3,-3,0,0,2,3,0,0,1,-4,0,0,-7³@.Hn¼ # 4,0,0,1,-3,0,0,5,3,0,0,1,-4,0,0,-7³@.x ͣͣͣͣͤ³Ž@‚µ!°’š”³Ž@ Œ€€µ!ķ»M³@–“Ž’šn³Ž@ µ!»H³@Ŗµ!Zķæ ‹ķ³Ž@“€‹µŽ?¹™™™™™š°’ą0³Ž@ ¾ µ!ŽZģæģ‰č³@ Č Šź»¾ĄNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž„;NNNNNNNNNNNNNNNNNNNNNN”””ū ³Ž@  Ņ ‹ķ³@ Ü ė ė »³@ ę µ!Žģ»³Ž@ š Šźü³Ž@  śµ! ėźµ(Ž@ ė軳Ž@ Ķ»D»C»F³@ ‡ėźµ(@ ė軳Ž@ Ķ»D»C»F³@ "‚ėźµ(@ ė軳Ž@ ,Ķ»D»C»F³@ 6ƒźµ(Ž@ ė軳Ž@ @Ķ»D»C»F³@ ŃNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŃhNNNNNNNNNNNNNNNNNNNNNN”””ūJˆźµ(Ž@ ė軳Ž@ TĶ»D»C»F³@^“Ž’ąŌ³Ž@hŠėŠŠėŠ»³@ rŌ²³Ž@ |Ķ»³@ †»³@ Ō²³Ž@ šĶ»³@ ¤»³@ ®€» ³Ž@ øƒ…»J³Ž@ ³@ Ģ Š³@ Ö „°Ž’гŽ@  ą»H³Ž@ ź‚쐳@ ō ė ė »³@  ž„žNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žāYNNNNNNNNNNNNNNNNNNNNNN”””ū ƒź³@ Ō²³Ž@ “Ž ’ŠƳŽ@ Ķ»³@ &³@ 0µŽ?ə™™™™š³@:Ī€»{»y³@DĪ€»{»y³@NĪ€»{»y³@XĪ€»{»y³@bĪ€»{»y³@cĪ€»{»y³@lµ!°’Ą*³Ž@ vź‚Č€Ą³Ž@ €ź‚ȁĄ³Ž@ Ёź‚Č‚Ą³Ž¤NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žņgNNNNNNNNNNNNNNNNNNNNNN”””ū@ ”ź‚ČƒĄ³Ž@ •ź‚ȁ³Ž@ž“Ž’Ąø³Ž@صŽ?„zįG®{³@ ²» ³@ ¼Ķ»³@ ʁµ!°’°¶³Ž@ Š€€»M³Ž@ ځꀀ€»M³Ž@ äµ!€€µ!Žķ»M³@ ī“Ž’°j³Ž@  ųĶ»³@ Ķ»M³@   Ķ»³@ Ķ»M³@   ½#³¤ONNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ĮVNNNNNNNNNNNNNNNNNNNNNN”””ū@ *Ķ»M³@  4½#³@ >Ķ»M³@  H½#³@ R€Ķ»M³@  S½#³@ U€Ķ»M³@  \»³@ f»ŽH³Ž@ p½³Ž†0Ą†0Ą†0Ą8@0 8 hhhJ%NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ”NNNNNNNNNNNNNNNNNNNNNN”””ūhh€@„ĀĀ’’ż¦’’ö“@<“   Ę "A2"A< "AF"AP$žĘ "AZ0Ba4A@ @ @ @ ˜Ķ»LetterI1I2I3I4AI5p)NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž §4NNNNNNNNNNNNNNNNNNNNNN”””ū³Ž@J…¼’’’’)Ž€ €£(Ž€€£(Ž€ €£(Ž€ €£(Ž€€¤³@J ޵! ėµ(Ž@ 뻳Ž@ ˜Ķ»D»B»F³@ ¢‡ėµ(@ 뻳Ž@ ¬Ķ»D»B»F³@ ¶‚ėµ(@ 뻳Ž@ ĄĶ»D»B»F³@ ʃµ(Ž@ 뻳Ž@ įļNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž >£NNNNNNNNNNNNNNNNNNNNNN”””ūŌĶ»D»B»F³@ Ոµ(Ž@ 뻳Ž@ ÖĶ»D»B»F³@ޱ³8@0 8   NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  ’NNNNNNNNNNNNNNNNNNNNNN”””ū’’’’ō@ĀĀ’’’’ų ō’’ö¾6ĄČ,6¾ ’’’źEś ’’’čEś ’’’ę ’’’äEś"’’žd €’’ž\€’’žTEś("’’üŌh!’’ü¼8€’’ü“@€’’ü¬ ’’üŖF J@ F Ŗ"’’ū* X ’’ū(F . ’’ū&F 2@ F Ŗ ’’ū$F t€’’ÅNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žXĮNNNNNNNNNNNNNNNNNNNNNN”””ūūF v0ś„@ F ’€’’ūF |€’’ū F  Cd_pColobsFractJIPensMaskFracMid ThicknessShowRowT_pColorsFraction Max_distance Color_map Color_arrayKColorHue Change_colorRotation@ĻNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žkšNNNNNNNNNNNNNNNNNNNNNN”””ū@  ¼ ³Ž@4 ¼€€£Ž€€£Ž€£ Ž€€¤³@"4¼!£!£!£!£!£ !£!£!¤³Ž@ "( ͤ³Ž@ 2¼  1,1,1³Ž@<µ!ސ³@Fµ!ސ³@Pµ!ސ³@.Z»uĪ»wƒ»w»xĪč»wƒ»w»x³Ž@.dĪ€»{»y³@nĪ€»{»y³@x›mNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž :JNNNNNNNNNNNNNNNNNNNNNN”””ūčü‚ķæ퐳Ž@‚ źü‚퐳Ž@Œ ‚ččü‚퐳Ž@<–¶Ž0 PRINT USING 160;Thickness,Mid,Frac,Max_distance³Ž@L< ¼ A "Thickness: ",K,", Mid: ",K,", Frac: ",K,", Max_distance: ",K³@ LŖæ³Ž@ “‚č°Ž’ü:³Ž@ ¾ źæźčü쐳Ž@ȶŽ PRINTÄ^NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  {NNNNNNNNNNNNNNNNNNNNNN”””ū Fraction³@ ҁȐ³Ž@ Ü‚ȁ³Ž@ ęƒČ ³Ž@š“Ž’ü̳Ž@.ś¶Ž# PRINT USING "3(D.DD,2X),/";Mask(*)³@6.¶Ž* PRINT USING "3(D.DD,2X),/";Color_array(*)³Ž@6Ķ»L³@ »"³@ "ƒµŽINTERNAL»I³@,ė뻳@ 6»³@ @»³@ %ŽNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž \(NNNNNNNNNNNNNNNNNNNNNN”””ū J€€»³@ Tµ!Ž(ė°Ž’ųгŽ@ ^źüļč³Ž@ hčō·b³Ž@ rȂȃČ»L³@ |øŽz³Ž@ †€€€»L³Ž@ ¹³@  š»H³Ž@" ¤»Dµ?ąźµ!Ž(»B»>³@" ®‹µŽ?„zįG®{½$³@ø“Ž’ų³Ž@Ā‹µŽ?„zįG®{½$³@ Öꐳ@ŸNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž oNNNNNNNNNNNNNNNNNNNNNN”””ū ąµ?¹™™™™™š»+’½³Ž@ ź» ³@ ōµ!°’šŌ³Ž@ žĶ»L³@ źņ·³Ž@ 谎’ōŗ³Ž@µ!Žźč³@&æµ?PbMŅń©ü󷐕³Ž@0Č‚ČƒČ»L³@ :“Ž’ōb³Ž@ D¹³@ N“Ž’š,³Ž@X»Ž³Ž@b‹µŽ?„zįG®ĀQNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž öŽNNNNNNNNNNNNNNNNNNNNNN”””ū{½$³Ąl¶Ž³Ž@mĄµ?„zįG®{쐳Ž@n€ń·4搳Ž@včüļ³Ž@€€ó·Zæꐳ@Š‚č°Ž’쐳Ž@ ”Č³Ž@ž“Ž’ģp³Ž@$Ÿ‘µ2ŽK,D.DDDœžµ2ŽHue: Ÿ¤³Ž@ $Øŗ³Ž@ ²½³Ž€€€öÆNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ÅæNNNNNNNNNNNNNNNNNNNNNN”””ū’’’’4Ä@ĀĀ’’īÜ’’~Œ²Ģ–X²?Œ€’’’˜ū ’’’ū ’’’ˆ: ’’’€ū1’’’|1’’’x1’’’t2’’’p( 2’’’l4&€’’’dū,€’’’\ū.€’’’Tū6€’’’Lū>ī’ūF€’’’DūP€’’’<ūT€’’’4ūX€’’’,ū\³NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ģNNNNNNNNNNNNNNNNNNNNNN”””ūj’ūf€’’’$ūr€’’’Eś¢Œ’ūx€’’’:€!’’žLŽ@ Åśž0ŠÅśö0V’ņ¬0”’ū¶@ ’’ž$ūĄ02Ā0 nÅśŹ1’’žH Ņ1’’žD@–1’’ž@H *’ūÜ0 bī1’’ž<P@ %Eś 0®0,P ’’’’ 06@ *EśJ0€DJ–NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž £ŻNNNNNNNNNNNNNNNNNNNNNN”””ū@ ,EśJ0čR@ .EśZ0R`@ 0Eśf0ŗn0ŒÅśv@ ’’’Ķ|@ 4Eś‚@ 5Eśˆ0$–€’’ž4Eśˆ€’’ž,Eś¤€’’ž$EśØ@ :Eś¬Egorp3XYAbLeftRightIXtrafsYtranPointsGorp1Gorp2Gorp3XYZLeftRightIXtransYtransZtrĄxNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ³ćNNNNNNNNNNNNNNNNNNNNNN”””ūansTrans_3dN1N2N3Rotation Gen_rot_3dFlStereoEye_sepDyShadesXprimeAlias GetshadesShowpensDraw_itObject2PensPlotlineObjectShadesYprimeZprimeUp_xDraw_it1Down_x­āNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž €ŅNNNNNNNNNNNNNNNNNNNNNN”””ūUp_yDown_yUp_zDown_zHere Update_transDzDx@  €³@ ¼€¤³@ »"³@ (ƒµŽINTERNAL»I³@2€µ1Ž’€µ1Ž…»³@ <»³@ F»³@ G€€»M³Ž×ŲNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ՁNNNNNNNNNNNNNNNNNNNNNN”””ū@H‚€€»M³Ž@Iƒ€»M³Ž@Jƒ…»J³Ž@ L'–³Ž@& P¶Ž CALL Colorscale(0,8,1,0,0)³@&&Z¶Ž CALL Colorscale(8,8,0,0,1)³@&d¶Ž GOSUB Getshades³ŽĄn¶Ž³Ž@x¶Ž FOR I=0 TO 15³Ž@‚¶Ž PEN I³Ž@Œ¶Ž FOR J=0 TO 5³@–¶ŽrYNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ę°NNNNNNNNNNNNNNNNNNNNNN”””ū MOVE 6*I+J,389³@ ¶Ž DRAW 6*I+J,350³@Ŗ¶Ž NEXT J³@“¶Ž NEXT I³@ ¾'–³ŽĄ ȶ޳Ž@ ҽ³Ž@ Ü €µ!°’šƳŽ@  ę  Ǥ³@" š Ē ǵ!ģµŽ?ąč搳Ž@"ś“Ž ’š†³Ž@ ŗ³ŽĄ ¶Ž³Ž@N¼ B .78,.775,.7ntNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž 'NNNNNNNNNNNNNNNNNNNNNN”””ū6,.736,.703,.662,.613,.558,.5,.441,.383,.328,.276,.228³Ž@>N"¼ 2 .184,.145,.110,.08,.056,.036,.021,.01,.004,.001,0³Ž@ >,¶Ž³Ž@R 6¶ŽF *********************************************************************³Ž@"R@¶Ž PROGRAM "STEREO_VIEW"³Ž@""J¶Ž°›NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž LNNNNNNNNNNNNNNNNNNNNNN”””ū CREATES RED-GREEN PAIR³@ "T¶Ž³ŽĄ ^'¶Ž³Ž@ h½³Ž@ r ¤³@ |¼££¤³@H†½½½£½½£½½£½½£½‚½½£½‚½½¤³Ž@$H½½½ £½½!£½½$¤³@$𠁰ޒą 4³Ž@ ¤  Ē£ !Ē£ $Ē£ Ǥ³@ ® Ē Ēµ1NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ENNNNNNNNNNNNNNNNNNNNNN”””ūśģ³Ž@ ø Ē !ǵ1śģ³Ž@ Ā Ē $ǵ1śģ³Ž@Ģ“Ž ’ąγŽ@ ֶ޳Ž@" ą¶Ž FIGURE TO BE PROJECTED³Ą"ź#¶Ž³Ž@,ō¼  11 ¶ŽPOINTS IN THE FIGURE³Ž@,ž¼  0,0,0³Ž@¼  1,0,0³Ž@¼  1,0,1³Ž@¼  1,1,1³Ž@&¼  0,1,1mhNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž *tNNNNNNNNNNNNNNNNNNNNNN”””ū³Ž@0¼  0,1,2³Ž@:¼  0,0,2³Ž@D¼  -1,0,2³@N¼  -1,0,0³@X¼  -1,1,0³@b¼  0,1,0³Ž@ l¶Ž³ŽĄ v¶Ž³Ž@(€¼ 26 ¶ TOTAL POINTS³@<(м 0,0,0,2 ¶! RAISE THE PEN - THIS IS THE CUBE³@<”¼  1,0,0,1³Ž&ģNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  zNNNNNNNNNNNNNNNNNNNNNN”””ū@ž¼  1,1,0,1³Ž@ؼ  0,1,0,1³Ž@²¼  0,0,0,1³Ž@¼¼  0,0,1,1³Ž@Ƽ  0,1,1,1³Ž@м  0,1,0,1³Ž@*ڼ 1,1,0,2 ¶ RAISE THE PEN³Ž@*ä¼  1,1,1,1³Ž@ī¼  1,0,1,1³Ž@ų¼  1,0,0,1³Ž@*¼ 0,1,1,2 ¶ RAISE T„wNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž >KNNNNNNNNNNNNNNNNNNNNNN”””ūHE PEN³Ž@* ¼  1,1,1,1³Ž@*¼ 0,0,1,2 ¶ RAISE THE PEN³Ž@* ¼  1,0,1,1³Ž@ *¶Ž³Ž@< 4¼ .1,.2,.5,2 ¶! RAISE THE PEN - DRAW THE PYRAMID³@<>¼ .5,.8,.5,1³@H¼ .5,.2,.9,1³@R¼ .1,.2,.5,1³@\¼ .5,.2,.1,1³@f÷"NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž kNNNNNNNNNNNNNNNNNNNNNN”””ū¼ .5,.8,.5,1³@p¼ .9,.2,.5,1³@z¼ .5,.2,.9,1³@*„¼ .5,.2,.1,2 ¶ RAISE THE PEN³Ž@*޼ .9,.2,.5,1³@ ˜¶Ž³Ž@ ¢³@ ¬€³@ ¶€³@ Ąµ!Ž-³@ŹŃÕĶÕĶÕĶÕÕÕÕÕ²³@ Զ޳Ž@ Ž€³@ 聐³@ ņ€³@ ČNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž X)NNNNNNNNNNNNNNNNNNNNNN”””ūüµ!Ž#³@ŃÕĶÕĶÕĶÕÕÕÕÕ²³@ ¶Ž³Ž@  µ1Ž,³@$ µ1ŽČ³@. µ1ސ됳Ž@8 ŃÕĶÕĶÕĶÕ Õ Õ Õ²³@ B¶Ž³Ž@ L €³@ V €³@ ` €³@ j ŃÕĶÕĶÕĶÕ Õ Õ Õ²³@ t¶Ž³Ž@ ~•³Ž@ ˆ¶Ž³Ž@ ’€µŽInc X½½’&½³ŽP‰NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž Į¾NNNNNNNNNNNNNNNNNNNNNN”””ū@œ…µŽDec X½½’)½³Ž@¦µŽInc Y½½’+½³Ž@°†µŽDec Y½½’-½³Ž@ŗ‚µŽInc Z½½’/½³Ž@济Dec Z½½’1½³Ž@ ζŽ³ŽĄ Ų22–³Ž@ ā¶Ž³Ž@ ģ½³ŽĄ ö&¶Ž ³Ž@ 9А³@  7€³@ 8€³@  ŃÕĶÕĶÕĶÕ9Õ7Õ8Õ² }NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ņNNNNNNNNNNNNNNNNNNNNNN”””ū³@ (•³Ž@ 2ŗ³Ž@ <¶Ž ³ŽĄ F)¶Ž³Ž@ P9Šė³Ž@ Z7€³@ d8€³@ n ŃÕĶÕĶÕĶÕ9Õ7Õ8Õ²³@ x•³Ž@ ‚ŗ³Ž@ Œ¶Ž³ŽĄ –+¶Ž ³Ž@ —9€³@ ˜7А³@ ™8€³@ š ŃÕĶÕĶÕĶÕ9Õ7Õ8Õ²³@ ›•³Ž@ œŗ³Ž@ ¶Ž ³ŽĄ ž-¶Ž¤ūNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž §ÜNNNNNNNNNNNNNNNNNNNNNN”””ū³Ž@ Ÿ9€³@  7Šė³Ž@ ”8€³@ ¢ ŃÕĶÕĶÕĶÕ9Õ7Õ8Õ²³@ £•³Ž@ ¤ŗ³Ž@ „¶Ž³ŽĄ -/¶Ž ³Ž@ .9€³@ /7€³@ 08А³@ 1 ŃÕĶÕĶÕĶÕ9Õ7Õ8Õ²³@ 2•³Ž@ 3ŗ³Ž@ 4¶Ž ³ŽĄ 51¶Ž³Ž@ 69€³@ 77€³@ 88Šė³Ž@ 9 ŃÕĶŻNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ”ķNNNNNNNNNNNNNNNNNNNNNN”””ūÕĶÕĶÕ9Õ7Õ8Õ²³@ :•³Ž@ ;ŗ³Ž@ <¶Ž³ŽĄ =6¶Ž³ŽĄ>¶Ž³Ž@?µ1Ž@@µ!ސ³@ AŃÕĶÕĶÕĶÕÕÕĶÕĶÕ²³@ B¶Ž³Ž@ C»³@ D»³Ž@ E»³@ FśŽ·³Ž@ G °Ž’Šö³Ž@ H Č ‚Č Ēė»&³Ž@ I“Ž ’ŠĢXNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž „ÓNNNNNNNNNNNNNNNNNNNNNN”””ū³Ž@JøŽx³Ž@ K ź°Ž’Ąp³Ž@ L čǁń·^³Ž@( M"Ō ČÕ ‚ČÕ čČÕ č‚ČÕĶՀղ³@( N¹³@ O“Ž ’Ą³Ž@P¹³@ Q¶Ž³Ž@ R»³@ S‚»³Ž@ TśŽ·ö³Ž@ U °Ž’°č³Ž@ V Č ‚Č Ēė»&³Ž@ W“Ž ’°¾³Ž@XøŽj¹NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  ·āNNNNNNNNNNNNNNNNNNNNNN”””ū³Ž@ Y ź°Ž’ b³Ž@ Z čǁń·P³Ž@( ["Ō ČÕ ‚ČÕ čČÕ č‚ČÕĶՈղ³@( \¹³@ ]“Ž ’  ³Ž@^¹³@ _¶Ž³Ž@ `ŗ³Ž@ a€»³Ž@ b½³ŽČ ŗ¼   Ä@ ¤³@  ŲĪ€»w»@ ͤ³Ž ģ¼Ąc^¾NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  ā±NNNNNNNNNNNNNNNNNNNNNN”””ū Ā|ą4(’’¶L`TX$@D īÅś €’’’ü !€’’’ōQ!€’’’ģū!€’’’äž €’’’ąū €’’’Üž €’’’Ųū(2’’’Ü02’’’Ų 22’’’Ō4€’’’Ģū6@ 08G @&Trans_3dPoantsXYAbXtransFatransZtb5·NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  рNNNNNNNNNNNNNNNNNNNNNN”””ūansUVAdITrans_#d@ @ ³Ž@ ~v¦ ³Ž@2 of XTrans_3dPointsXYZXtransYtransZtransUVTITrans_3d³Ž@ d¶Ž ³Ž@2 e¶Ž ' Points is the number of X,Y,Z triplets³@>2 f¶Ž 2 X,Y,Z a׉NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  HNNNNNNNNNNNNNNNNNNNNNN”””ūre arrays constituting coordinate triplets³Ž@:> g¶Ž / Xtrans, Ytrans, Ztrans are translation factors³@ : h¶Ž ³Ž@0 i½½„½½£½„½½ £„½„½½ ¤³@0 j¶Ž ZERO U AND V³@ kĪ€»{»y³@ l Ī€»{»y³@  m¶Ž ³Ž@ n °Ž’šP³Ž@ oŌNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  {&NNNNNNNNNNNNNNNNNNNNNN”””ū Č ǐ³Ž@ p ‚Č ǐ³Ž@ q ƒČ ǐ³Ž@ r „ȁ³Ž@ s“Ž ’š³Ž@  t¶Ž ³Ž@ u Ī€»{»y³@  v¶Ž ³Ž@ w ȁ³Ž@ x‚‚ ȁ³Ž@ yƒƒ ȁ³Ž@ z„„ ȁ³Ž@ {„ Ȑ³Ž@ |„‚ Ȑ³Ž@ }„ƒ Ȑ³Ž@ ~ ĪĪ Ī»„»y³Ž@  °Ž’ąD³Ž@ ½±NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž .uNNNNNNNNNNNNNNNNNNNNNN”””ū€ Ē  ȏ³Ž@  Ē ‚ ȏ³Ž@ ‚ Ē ƒ ȏ³Ž@ ƒ“Ž ’ą³Ž@„±³@ …¶Ž³Ž  ÄĄ†Ā"4,’’Šņ‚Lž$^ź jÅś €’’’ü !€’’’ō !€’’’ģQ!€’’’äū €’’’ąž €’’’Üū €’’’Ųž\¾NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž DNNNNNNNNNNNNNNNNNNNNNN”””ū" €’’’Ōū&2’’’Ü*2’’’Ų ,2’’’Ō.€’’’Ģū0@ ’’’Äū2@ ’’’¼ū606@&@ Gen_rot_#dPoints XYZN@!G @&@ Gen_rot_#dPoints XYZNq N2N3Bd1UVTAaT2Gen@4 Gen_rot)NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ”–NNNNNNNNNNNNNNNNNNNNNN”””ū_3dPointsXYZN1N2N3T1UVTIGen_rot³Ž@ ‡¶Ž ³Ž@4 ˆ¶Ž ( Points is number of coordinate triplets³Ž@84 ‰¶Ž - X(*), Y(*), Z(*) contain coordinate triplets³@88 Š¶Ž - N1, N2, N3 are direction cosines for X, Y, Z³@,8 ‹¶Ž @NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ’§NNNNNNNNNNNNNNNNNNNNNN”””ū T1 is rotation angle in degrees³Ž@ , Œ¶Ž ³Ž@ »)³@ ޼ ³Ž@0 ½½„½½ £½„½½ £„½„½½ ¤³@ 0 ¶Ž ³Ž@ ‘ °Ž’šl³Ž@ ’  Č ǐ³Ž@ “ ‚ Č ǐ³Ž@ ” ƒ Č ǐ³Ž@ • „ ȁ³Ž@ –“Ž ’š³Ž@ — Ī€»{»y³@ ˜„„ ȁ³ŽLNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ĒōNNNNNNNNNNNNNNNNNNNNNN”””ū@ ™ Čģģźüæģ萳@ š‚ Č쁿źüģæģ萳@ ›ƒ Č쁿źüģæģꐳ@ œ‚ Č쁿źüģæģꐳ@ ‚‚ Čģģźüæģ萳@ ž‚ƒ Č쁿źüģæģ萳@ Ÿƒ Č쁿źüģæģ萳@  ƒ‚ Č쁿źüģæģꐳ@ ”ƒƒ Čģģźüæģ萳@ ¢ Ī ĪčĆNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ōÅNNNNNNNNNNNNNNNNNNNNNN”””ū Ī»„»y³Ž@ £ °Ž’ąź³Ž@ ¤ Ē  Ȑ³Ž@ „ Ē ‚ Ȑ³Ž@ ¦ Ē ƒ Ȑ³Ž@ §“Ž ’ąسŽ@ر³@ ©¶Ž³Ž  ÄĄŖ&Ā p˜4’’X hī (HD4  ŒÅś €’’’ü!€’’’ō !€’’’ģQ!€’’jÓNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž mRNNNNNNNNNNNNNNNNNNNNNN”””ū’äū €’’’ąž €’’’Üū"€’’’Ōž""€’’’Ģū(2’’’Ģ.2’’’Č 02’’’Ä22’’’Ą$42’’’¼062’’’ø<8€’’’°ū:@ ū~€’’’Øū>€’’’ ūJ€’’’˜ūV€’’’ūb€’’’ˆ:n€’’’€ūp€’’’xūt€’’’pūx€’’’hūz@ ’ū†@ ’’’åū’P ’’’’ÄJœP ’’’’’ū¦ĶNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ^cNNNNNNNNNNNNNNNNNNNNNN”””ū@ ū°P ’’’’’ū²@ ū¼@ !DJĄ@ ’’’ŽūÄ@ ’’’ŻDJČ@ ’ūĢG Stereo0ÖAaZFlEye_sepLef@!G @&G StereoF`ointsXAaZFlEye_sepLeft RightUAdRPQTAa X_min_deft X_mOX֒NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  0NNNNNNNNNNNNNNNNNNNNNN”””ūStereoPointsXYZFlEye_sepLeftRightULRPQTI X_min_left X_min_right X_max_left X_max_rightOXlXrDL1Stereo³Ž@ «¶Ž ³Ž@8 !yNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž 8NNNNNNNNNNNNNNNNNNNNNN”””ū¬¶Ž , Points is the number of coordinate triplets³Ž@88 ­¶Ž - X(*), Y(*), Z(*) contain coordinate triplets³@88 ®¶Ž , Fl is the focal length of the stereo viewer³Ž@,8 ƶŽ ! Eye_sep is distance between eyes³@,, °¶Ž ! Left(*) is matrix of left points³@., LĮNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž (?NNNNNNNNNNNNNNNNNNNNNN”””ū±¶Ž # Right(*) is matrix of right points³@B. ²¶Ž 7 ALLOCATE Left and Right at (Points,2) in OPTION BASE 1³@ B ³¶Ž ³Ž@ “¼ ³Ž@J µ½½„½½ £½„½½ £½„½½ £½„½½ £½„½½ ¤³@J ¶½„½„½½¤³@  ·¶Ž ³Ž@ ø°Ž’šŗł‡NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž NNNNNNNNNNNNNNNNNNNNNN”””ū³Ž@ ¹ Čǐ³Ž@ ŗ‚ Čǐ³Ž@ »ƒ Čǐ³Ž@ ¼„ ȁ³Ž@ ½“Ž’šj³Ž@& ¾¶Ž CREATE LEFT EYE PERSPECTIVE³@& æĪ€»{»y³@ Ąȁ³Ž@ Į‚‚ȁ³Ž@ ƒƒȁ³Ž@ Ƅ„ȁ³Ž@ ă„ȁķ됳@ ńČµ!Ž퐳Ž@ Ę Ī ĪĪ»„»y³Ž@4 Ē„XNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž N]NNNNNNNNNNNNNNNNNNNNNN”””ūȵ!Žķė¶!CREATE RIGHT EYE PERSPECTIVE³Ž@4 Č Ī ĪĪ»„»y³Ž@ ɵ`ŽA.„~³@ ʵ`ŽA.„~³@  Ė€³@ ̐³@ ́°Ž’ąڳŽ@ Ī„ ȁ³Ž@ Ļ„ ȁ³Ž@ Ё ȁ Č„ Č퐳Ž@ Ń‚ Č‚ Č„ Č퐳Ž@ ҁ ȁ Č„ Č퐳Ž@ Ó‚ Č‚ Č„ Č„nNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž }lNNNNNNNNNNNNNNNNNNNNNN”””ū퐳Ž@ ԁ Ȑ³Ž@ Ձ Ȑ³Ž@ ÖĄ³Ž@ ץ³Ž@ ŲĄ³Ž@ ŁĄ³Ž@ ړޒąų³Ž@ Ūčü‚ķčü‚ķꐳ@ Üźü‚ķ萳Ž@ ŻĪ€»{»y³@ ށȁ³Ž@ ߂‚ȁ³Ž@ ąƒƒȁ³Ž@ į„„ȁ³Ž@ ℁Ȑ³Ž@ ć Ī ĪĪ»„»z¶NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž äūNNNNNNNNNNNNNNNNNNNNNN”””ūy³Ž@ 䄁Č됳@ å Ī ĪĪ»„»y³Ž@ ęĪ€»{»y³@ ēĪ€»{»y³@ 聰ޒР³Ž@ éČ Ȑ³@ ź‚Č‚ Ȑ³@ ėČ Ȑ³@ ģ‚Č‚ Ȑ³@ ķ“Ž’гŽ@ī±³@ ļ¶Ž³Ž  Ĥ³@Ī€»t«NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ׏NNNNNNNNNNNNNNNNNNNNNN”””ū@ Ąš Ā (’’f &> 'ü €’’’üž €’’’ų%ų €’’’ō €’’’šv €’’’ģ@€’’’čū€’’’ąū"€’’’Ųū(@ 0’ž*@!@ Jcolorscale FirstNregsRGBBdiIntenAa Color_scaleaęNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ‚™NNNNNNNNNNNNNNNNNNNNNN”””ū@ ³Ž@8 4B¢óµ!źųņ ColorscaleFirstNregsRGBDiIntenI Color_scale³Ž@8 ń‚óµ!źčüņų€óų€óųņų€óųņų€óųņų·ž×³@8 ņźü퐳Ž@  󀐳@ ō聟°Ž’š³Ž@ õģģģ»M³Ž@  ö萳@ ÷ NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ±ØNNNNNNNNNNNNNNNNNNNNNN”””ū“Ž’šгŽ@ų±³@ ł¶Ž³ŽĄśĀtĄČ’’vhätĢ(` *Åś €’’’ü €’’’ų €’’’ō+ €’’’šū!€’’’螀’’’øū"€’’’°ū&€’’’Øū*€’’’ ū.2h’ū2€’’’˜DJ8€’’’ū<@ ū@0šÄJF0Ģ’ūL€’’gUNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž –¦NNNNNNNNNNNNNNNNNNNNNN”””ū’ˆūR€’’’€ūV€’’’xūX€’’’pūZ0ˆÄJ\€’’’hūd€’’’`ūf€’’’Xūh€’’’Pūl€’’’Hūp€’’’@ūr€’’’8ūtb YbSha0’žz@!@ H`lotlineB`aYaX €’’’äū„desX1Yq X2Y2EcetupDxBdyYgtxDagtxXgtµÉNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž „—NNNNNNNNNNNNNNNNNNNNNN”””ū"PlotlineXaYaXbYbShadesX1Y1X2Y2SetupDxDyYgtxXgtySdMCYFNRoundPSMcM1cXIIndexPlotlineBase³Ž@ ū³@ ü³@ ż³@ ž ³@ ’ ŌÕÕÕ Õ Õ Õ²³Ž@  æ æņ·Ģ˜³ŽĄ ¶Ž ³Ž@  )œNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž šÄNNNNNNNNNNNNNNNNNNNNNN”””ū 搳@  ķæ³@ ģčæ퐳@ ÓÓÕ²źüģčÕ²³Ž@ źüģ쐳Ž@ µŽ?ąźüģ쐳Ž@  쐳@  źü쐳Ž@  €ń·~³@  ÓÕ²ÓÕ²°Ž’ą’³Ž@  ė°’š6³Ž@  ģźæµ!쐳Ž@  €»³Ž@2 µ8Ž@8€ßÕNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ĆõNNNNNNNNNNNNNNNNNNNNNN”””ūóµ?ąėõ÷·Ē‚ķ"軳Ž@2 ģ軳@ ģ軳@ “Ž’š°³Ž@ õ·l³Ž@  萳@ 萳@ øŽ€³Ž@  萳@ ¹³@ “Ž’ąœ³Ž@ ׳Ą ¶Ž ³Ž@   搳@  ķæ³@ ģčæ퐳@ Ó9ŖNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ZbNNNNNNNNNNNNNNNNNNNNNN”””ūÓÕ²źüģčÕ²³Ž@  źüģ쐳Ž@ !µŽ?ąźüģ쐳Ž@  "쐳@ #źü쐳Ž@ $€ń·L³@ %ÓÕ²Ó Õ²°Ž’Ą`³Ž@ &ė°’гŽ@ 'ģźæµ!쐳Ž@  (€»³Ž@2 )µ8Ž@8€óµ?ąėõ÷·ŅĒ‚ķ"軳Ž@2 *ģč»ÖśNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž iSNNNNNNNNNNNNNNNNNNNNNN”””ū³@ +ģ軳@ ,“Ž’Š~³Ž@ -õ·:³Ž@  .萳@ /萳@ 0øŽN³Ž@  1萳@ 2¹³@ 3“Ž’Ąj³Ž@4±³@ 5¶Ž³ŽĄ6ĮÄ ’’–øvÄn®00ˆ €’’’ü%ų@"…æ …» 0’ž @"…æ …»ČNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž <NNNNNNNNNNNNNNNNNNNNNN”””ū FNRFNRoundXRound³Ž@ 7µŽ?ąčæŗ³@ 8½³Ž@ 9¶Ž³ŽĄ:Ā@’’źŹ¾  1L €’’’ü%ų €’’’ų €’’’ųū@"„’ „ū 0’žwapX1Xr TSwap@ ³Ž@" ~³@" A‡NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž 1NNNNNNNNNNNNNNNNNNNNNN”””ū³@" €³@ ±³@ ³Ž@SwapX1X2TSwap³Ž@ ;³@ <³@ =³@ >±³@ ?¶Ž³ŽĄ@ Ā’’ż¤Ą’’€T>@\"T 2h €’’’ü%ų €’’’ų €’’’ōv €’’’š@ €’’’ģž €’’’č0€’ū‘NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž NNNNNNNNNNNNNNNNNNNNNN”””ū1L’ū&@ ū,@ 0’ž4@!@ @&SetupB`1X2Yq Y2DxBdyFind_dcSwapFifd_dsSetu`³Ž@&„¶ŽP ³Ž@  …æSetupX1X2Y1Y2DxDyFind_dsSwapSetup³ŽĄA¶Ž NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  ,>NNNNNNNNNNNNNNNNNNNNNN”””ū³Ž@  Bꐳ@ Cꐳ@ Dææõ· ³Ž@ E€ó·ü³Ž@ FŌÕÕ²³Ž@ GŌÕÕ²³Ž@  H–³Ž@ I¹³@ JøŽT³Ž@ K€ó·L³Ž@ LŌÕÕ²³Ž@ MŌÕÕ²³Ž@  N–³Ž@ O¹³@ P¹³@Q±³?ų뻳Ž@rµ! »H³@|»Dµ(Ž@BĀNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  ymNNNNNNNNNNNNNNNNNNNNNN”””ū’’’’M“@ĀĀ’’^D’’ :‚øX‚‡Œ’’’ģ’ūL0Ž šĘ ’’’Ų’’’Ä(0Ę 6PĘ <€’’’¼F D ’ūV ’ū’’’õ’ū` ’ūn ’ū’ūt’ūz’ū|’’’ļ’ū‚®ØNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  J\NNNNNNNNNNNNNNNNNNNNNN”””ū’ūˆB’ūšĚ B¦’’’é’ūŖ’’’čB®’ū²BĄ’ūĪ’ūŌ’ūŲ’’’ā’ūā’ūź ’ūš!’ūö"’ūž#’ū’’’Ü’ū %’ū&’ū'’ū (’ū$)’ū.’’’Ö’ū8+’ūD)gNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  ÓĖNNNNNNNNNNNNNNNNNNNNNN”””ū,’ūN-BX.’ūb/Bh’’’Š’ūn1’ūt2’ūz3’ū†4BŠ5’ū–’’’Ź’ūš’’’ÉB ’’’Č’ū¦’’’Ē̬’’’ĘB¶;’ū¼<’ūÄ=’ūŹ>’ūŠ?’ūÖ’’’Ą’ūąA’ūęB’ūīC’ūōD’ūüEI³NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  ąśNNNNNNNNNNNNNNNNNNNNNN”””ū’ū’’’ŗ’ūG’ūH’ū I’ū JBK’ū’’’“’ū M’ū.N’ū8O’ū<P’ūBQ’ūR’’’®’ū\S’ūbT’ūdU’ūpV’ūtW’ūx’’’Ø’ū„Y’ūˆZ’ūŒ[’ū’\B–]’ū¢’’’¢’ūØ“NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž µ©NNNNNNNNNNNNNNNNNNNNNN”””ū’’’”B®’’’ ’ūø’’’ŸÄš¾b’ūĀc’ūČd’ūŅe’ūŲf’ūÜ’’’™’ūäh’ūźi’ūšjBök’ūlB’’’“’ū ’’’’Äšo’ūp’ū"q’ū.rB2s’ū6’’’ŒB<u’ūBvBFw’ūLxBą’NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž †˜NNNNNNNNNNNNNNNNNNNNNN”””ūRy’ū`’’’†Äšj’’’…BZ|’ūt}’ūx~’ū€’ū†€’ūˆ ’’’’ūT‚’ūŽƒ’ū„’ū–…’ūž †’ūōFile$XIOopsSource$ FNFile_exists Destination$FNAskMessageBombed X_gdu_max Y_gdu_max FNData_pointTexiNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ×"NNNNNNNNNNNNNNNNNNNNNN”””ūt$CsizeYLorgAnglePolygonPolygonsSideSidesPenDxDy Define_deltas Define_deltasTempNewPreviousScreenXminXmaxXrangeYminYmaxYrangeDecadeUnitsPerMantissaExponent TemperatureRotation New_curve New_curveSpinSpinDel'ČNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž äNNNNNNNNNNNNNNNNNNNNNN”””ūtaDelta FNIntensityLem Pen_controlLemRoomDeskChair BookshelfTableObject$RoomDeskChair BookshelfTableObjectsArrayLetterPointsFLAXHorizonTreeTree2 Sun_diameter Sun_deltaPhiBirdPosition_angleDistanceThetaR Left_angleXWīNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ±@NNNNNNNNNNNNNNNNNNNNNN”””ū2Y2 Right_angleX3Y3SizeUdc Old_chars$CharsSigmaInfinityArrowBoxSigmaInfinityArrowBoxNew_udcLdirLabelBlackMessage$Pal1Pal2Pal3Pal4 New_order Pause_timePalPalTextTextBarRatioDataTitle$FillGlabels$Blabels}5NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ‚qNNNNNNNNNNNNNNNNNNNNNN”””ū$CrtGroupsBarsJGroupNMode$Between Bar_chart@  ¼ ³Ž@ ¼³ŽChdu££dv¤³Ž@@¼dwŽ€ € £dxD€£dyD€ £dzD€ £d{€ €¤³@ @(d|³Ž@ 2½³@ ¶ŽH and repeat length for that bar. ?‘NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž J“NNNNNNNNNNNNNNNNNNNNNN”””ū !³Ž@TTH¶ŽH Between: This value contains an value which specifies the !³Ž@TTR¶ŽH distance, in pixel rows, between horizontal or !³Ž@TT\¶ŽH vertical lines. This value may be adjustedt NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž y…NNNNNNNNNNNNNNNNNNNNNN”””ū slightly !³Ž@TTf¶ŽH to ensure that the bar is divided into an integral !³Ž@TTp¶ŽH number of vertical segments. The distance between !³Ž@TTz¶ŽH diagonal segments is the value of Between dividÆNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž i»NNNNNNNNNNNNNNNNNNNNNN”””ūed !³Ž@TT„¶ŽH by the square root of two. This makes diagonal- !³Ž@TT޶ŽH containing bars meet horizontal-containing bars in !³Ž@TT˜¶ŽH a nice way. *MNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  ZŠNNNNNNNNNNNNNNNNNNNNNN”””ū !³Ž@TT¢¶ŽH Mode$: This string specifies which kind of bar chart is to !³Ž@TT¬¶ŽH be produced: comparative (also call clustered), !³Ž@TT¶¶ŽH where the bars are beside each other within the !āhNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  ŁNNNNNNNNNNNNNNNNNNNNNN”””ū³Ž@TTĄ¶ŽH groups, and stacked, where the not only the values !³Ž@TTʶŽH within groups are being compared, but the sums of !³Ž@TTŌ¶ŽH groups are being compared. The trimmed, uppercase !³Ž@Tų$NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  <čNNNNNNNNNNNNNNNNNNNNNN”””ūT޶ŽH value of Mode$ must be either "COMPARATIVE" or !³Ž@TTč¶ŽH "STACKED". !³Ž@TTņ¶ŽH Crt: This is a logical variable, specifying whether or !³Ž@TTüæyNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  „NNNNNNNNNNNNNNNNNNNNNN”””ū¶ŽH not the chart is to be sent to a CRT. If false, !³Ž@TT¶ŽH a plotter is assumed. !³Ž@TT¶ŽH-----------------------------------------------------------------------!³Ž@"T¼ ¶ŽDNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  –NNNNNNNNNNNNNNNNNNNNNNN”””ū0 Start arrays at one.³@2"$¼¶Ž0 £ £ ¤¶Ž0 Needed by SUB Bar(...)³@22.¼€ ¤¶0 Accumulated bars when STACKED³Ž@T28¶ŽH Set up the plotter=====================================================³Ž@6TB‹ĄĄ쐶Ž0 Right edge of plotting suHīNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ĆNNNNNNNNNNNNNNNNNNNNNN”””ūrface³@(6L‚퐶0 Middle (in X direction)³Ž@6(V‹ĄķĄ쐶Ž0 Top edge of plotting surface³@(6`‚퐶0 Middle (in Y direction)³Ž@2(jµŽ?¹™™™™™š¶0 \ These four statements³Ž@42tµŽ?ģĢĢĢĢĢ͐¶0 \ define the limits which³Ž@04~µŽ?©™™!NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž š,NNNNNNNNNNNNNNNNNNNNNN”””ū™™™š¶0 / will be used in the³Ž@00ˆµŽ?ģĢĢĢĢĢ͐¶0 / VIEWPORT statement.³Ž@T0’¶ŽH Extract information from the Data(*) array=============================³Ž@*Tœ΁Ą¶Ž0 Number of rows=Groups³Ž@0*¦Ī‚Ą¶Ž0 Number of columns=Bars/Group³ ŗNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž †NNNNNNNNNNNNNNNNNNNNNN”””ū@,0°ĄĄ¶0 Give the user a break...³@B,ŗµBŽ COMPARATIVEńŽ·e us¶Ž0 Bars to be beside each other?³Ž@2B ÄĶĄ¶Ž0 Maximum is high value is array³@42 εŽ?ęfffffg퐶0 Each bar="one barth" of .7³@&4ŲøŽŽ?ę¶Ž0 Mode$<>"COMPARATIVE"³@6& āSANNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž µ>NNNNNNNNNNNNNNNNNNNNNN”””ūµBŽSTACKEDńŽ·<>"C¶Ž0 Bars to be cumulative?³@.6 ģĪĪ»»y¶Ž0 Find sum of bars values³Ž@0. öĶĄ¶Ž0 Find highest value per group³@(0 µŽ?ęfffffg¶0 Each bar .7 wide³@"(  øŽŽ?ę¶Ž0 Mode$<>"STACKED"³@" ½$¶0 Oops³@2 ›µBŽ!Illegal BaœlNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ąmNNNNNNNNNNNNNNNNNNNNNN”””ūr Chart mode selected: Ÿ¤³Ž@2 (×¶0 Leave³Ž@ 2¹¶0 (Mode$="STACKED"?)³@"<¹¶0 (Mode$="COMPARATIVE"?)³@6"FŌüÕÕÕÕ²¶0 Make Ymax nice, and find delta³@.6Pµ>. č&֕ꐶŽ0 Avoid roundoff error³@&.Z ·µ>¶Ž0 Plotting on a tube?³Ž@&& d»NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž Ó\NNNNNNNNNNNNNNNNNNNNNN”””ū¶0 If so, clear the screen,³@8& nĄ„ėĄµX?õohŪń·the ¶Ž0 Is this a Model 36?³Ž@08 xµ1Ž…¶0 Yes! A Model 36! (512 x 390)³@&0 ‚øŽ1Ž…¶Ž0 No! Not a Model 36³Ž@.& Œµ1Ž+¶0 Model 16 or 26 (400 x 300)³Ž@. –¹¶0 (Model 36?)³Ž@( øŽ0 (¶Ž+LNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž JĖNNNNNNNNNNNNNNNNNNNNNN”””ū0 Not plotting on a CRT³Ž@"( Ŗ¶0 Plenty of resolution³@"“¹¶0 (crt?)³@,¾Ą쐶0 Calculate width in pixels³Ž@(,Č źüģüķ쐶8 Pixels/Unit in Y³@((Ņ źüģüķ쐶8 Pixels/Unit in X³@0(Ü  ķ‰ėĄ¶Ž0 \ This section of code³Ž@.0꣏NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž yśNNNNNNNNNNNNNNNNNNNNNN”””ū„ō·‰ėĄ¶Ž0 \ ensures that bars are³@*. š! ¶0 \ vertically divided into³@.*śøŽ¶0¶Ž0 / whole sections, unless³Ž@0. !‚"Ó Õ²Ą¶0 / the user requests a³@&0¹¶0 / distance less than 4.³@*& !퐶0 Tweak Dx for integral divs³łzNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ,©NNNNNNNNNNNNNNNNNNNNNN”””ū@0*" !ķü쐶Ž0 Tweak Dy by the same amount³Ž@.0, 퐶0 New Ratio from Ymax and Groups³@T.6¶ŽH Label the plot=========================================================³Ž@TT@¶ŽH Label the main title and the subtitle------------------------------V£NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ˜NNNNNNNNNNNNNNNNNNNNNN”””ū----³Ž@FTJ#µŽ?Ł™™™™™šėµŽ?Ł™™™™™šµ?ə™™™™š°btitle¶Ž0 Make fat letters³@(F T$Ō†Õµ?ć333333ՀՆՁÕ#čÕՁĒÕ²³@(^“Ž#µ?ć33³Ž@2h$ԃյ?ć333333ՀՆՁÕÕµ(Ž?īfffffgģՂĒÕ²³@2rģģģģ» ³@&|»¶0 Frame the viewport area³Ž@:&†µ?ą’NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ¦NNNNNNNNNNNNNNNNNNNNNN”””ūµŽ?ąč€»¶Ž0 Set up user units³Ž@,:»¶0 Write labels outside VIEWPORT³Ž@T,š¶ŽH Label the Y-axis ------------------------------------------------------³Ž@.T¤%"Óæ Õ²¶Ž0 How many digits in Ymax?³@<.®&µBŽ#,%čĄæµDµŽ.%ŪNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž <—NNNNNNNNNNNNNNNNNNNNNN”””ūė‚čæµŽDūū%ōĄūūū³@4<ø#€°#,%č¶Ž0 Labels on left side of chart³@,4 Ā'Ł&œž#¤¶0 Translate value to string³Ž@>, Ģ$ԃյ?ć333333ՀՈՁյŽ?ąčüµ?„zįG®{ģźÕ#Õ'Õ²³@ >Ö“Ž#µ?ć33¶Ž0 et cetera³Ž@T ą¶ŽH Label the groups of bars-------–³NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž iÄNNNNNNNNNNNNNNNNNNNNNN”””ū----------------------------------------³Ž@*Tź(°Žabel t¶Ž0 At bottom of chart³@* ō)‚µ!((Ēæ ķķĄ³@* ž$Ō‚Õ)ՀՆՁÕ(ÕµŽ?„zįG®{ģėÕ(ĒÕ²³@*“Ž()ՀՆճŽ@T¶ŽH Label the bar legends--------------------------------------------------³Ž@ }ņNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ZõNNNNNNNNNNNNNNNNNNNNNN”””ūT*źüźüķģµ?ąč³Ž@> &+*µŽ?ąčüźüµ?Ł™™™™™šģ¶Ž7 Half of width of box³@,>0,µ!퐶Ž0 Height of bar legend box³@F,:-µ?ąč*µŽ?ąčüźü‚ķ萶Ž7 Middle of bottom of box³Ž@,FD.°Ž¶Ž0 Along right edge...³Ž@4, NT†NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ĆbNNNNNNNNNNNNNNNNNNNNNN”””ū/.µ(Ž?¹™™™™™šģźü쐶Ž0 Calculate Y position³@04 X.‚Č»¶0 Define pen from Fill(*) array³Ž@,0 b.ƒČ.„Č»¶0 ...and line type, too³Ž@, l0Ō-+źÕ-+čÕ/Õ/,čÕ.ČÕ²³@ v)‚†.Ēæ ķĄ³Ž@ €$Ō‚Õ)ՀՆՁÕ-Õ/Õ.ĒÕ²³Ž@Š“Ž.)ՀՆճŽ@T”¶ŽH Draw thiFNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž šSNNNNNNNNNNNNNNNNNNNNNN”””ūe bar chart=====================================================³Ž@(ó·č/»¶Ž7 \ Put reference ticks,³@2,ŲėNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ±?NNNNNNNNNNNNNNNNNNNNNN”””ūH/ź°¶Ž7 \¶Ž7 \ from bottom to top,³Ž@,2R(ģü‚ķč/»¶Ž7 \ to the right of³Ž@2,\(čģü‚ķź/»¶Ž7 / every group of bars³Ž@,2f“Ž/ģü‚ķź¶Ž7 / except the right-³Ž@, p¹¶7 / most one.³Ž@ z“Ž( / m³Ž@ „/ź° m³Žt ¶Ž0 \³ŽņNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ‚NNNNNNNNNNNNNNNNNNNNNN”””ū@2 Žģü‚ķč/»¶Ž0 \ Reference ticks on the³@82 ˜µŽ?ąč/»¶0 / right edge of the chart³Ž@8 ¢“Ž/?ą¶Ž0 /³Ž@.¬øŽ/?ą¶Ž0 This chart is to be STACKED³Ž@. ¶/ź°0 Thi¶Ž0 \³Ž@: Ąµ?ą/»¶Ž0 \ Make reference ticks onmNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ×]NNNNNNNNNNNNNNNNNNNNNN”””ū the³Ž@.: ʁ‚ķź/»¶0 / left edge of the chart³@. Ō“Ž/ź/»¶¶Ž0 /³Ž@* Ž(°Ž»¶¶Ž¶Ž0 For each group...³Ž@(* č1€¶0 Start new bar atop old bar³@(( ņ.°Ž Start¶Ž0 For each bar...³Ž@*(ü.‚Č»¶0 Define pen from Fill(*)³Ž@2* .ƒČ.„Č»BNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž älNNNNNNNNNNNNNNNNNNNNNN”””ū¶0 Define line type from Fil(*)³@&2 0Ō(‚ķźÕ(‚ķčÕ1Õ1(.ČčÕ.ČÕ²³Ž@,& 11(.Č萶Ž0 Where did it leave off?³Ž@, $“Ž.Č萶޳Ž@" ./"Ó(ĒķÕ²ģź°Žid it ³Ž@0" 8(‚ķź/»¶0 \ Reference ticks starting³Ž@,0 B(‚ķč/»¶0 / above top of top b—NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž }ūNNNNNNNNNNNNNNNNNNNNNN”””ūar³Ž@, L“Ž/č/»¶³Ž@, V(ó·č/»¶Ž7 \ Put referenc ticks,³@2, `/ź°¶Ž7 \¶Ž7 \ from bottom to top,³@(2 j(‚ķč/»¶7 \ to the right of³@.( t(č‚ķź/»¶7 / each stack of bars³Ž@,. ~“Ž/‚ķź/»¶Ž7 / except the right-³@, ˆ¹¶7ī«NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž NŹNNNNNNNNNNNNNNNNNNNNNN”””ū / most one.³@ ’“Ž( / ³Ž@ œ/ź° ³Žst¶Ž0 \³Ž@. ¦‚ķč/»¶0 \ Reference ticks on the³@4. °µŽ?ąč/»¶0 / right edge of chart³Ž@4 ŗ“Ž/?ą¶Ž0 /³Ž@ Ĺ³@ Ī»¶0 Pick up the pen³Ž@  Ų€»¶Ž0 Put the pen away³@†ĢNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ™NNNNNNNNNNNNNNNNNNNNNN”””ū  ā±³@T ģ¶ŽH ***********************************************************************³ŽĄ öĀ ˆ ’’Ś 4D” ˆ,’ūB’ūĚB’’’ūÄų’’’śx ’ū*B. ’ū2 $zNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž (ØNNNNNNNNNNNNNNNNNNNNNN”””ūĚ6 ’ū<’’’ōB@ ’ūJ’ūTB`’ūh’ūr’’’ī’ūt adioBarBabXminXmaxYminamax FilatioBarBarXminXmaxYminYmax Fill_typeBarDxDyRatioPen Line_type Bar_width Lines_wideF§ņNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž 8–NNNNNNNNNNNNNNNNNNNNNN”””ūNCeil DirectionYX³Ž@T ¶ŽH-----------------------------------------------------------------------!³Ž@TT ¶ŽH This sub program creates a single bar and fills it with the desired !³Ž@TT ¶ŽH hatched fill pattern. X|żNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž   §NNNNNNNNNNNNNNNNNNNNNN”””ūmin, Xmax, Yin, and Ymax are the left, !³Ž@TT ¶ŽH right, bottom and top edge (in current units) of the bar to be !³Ž@TT (¶ŽH produced. Fill_type specifies what lines are to be included in the !³Ž@TT 2¶ŽH hatched fill pattern. HorizšNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  ^ōNNNNNNNNNNNNNNNNNNNNNN”””ūontal lines are included if bit 0 is !³Ž@TT <¶ŽH set, ascending diagonal if bit 2, vertical if bit three, and !³Ž@TT F¶ŽH descending diagonal if bit four. !³Ž@TT P¶ŽH----------------------------------ŃPNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  mÅNNNNNNNNNNNNNNNNNNNNNN”””ū-------------------------------------!³Ž@T Z¼H--£ £ ¤³Ž@ d¼ € £ Ž€ ¤³@ n»³@ x źü¶ŽRatio³@ ‚Ó ķÕ²³Ž@D Œ€Ą·Õ²¶Ž". Horizontal lines-----------------------------³Ž@ D –³@   č °¶Ž".³Ž@  Ŗś 9NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  ōRNNNNNNNNNNNNNNNNNNNNNN”””ū³Ž@ “·ś³Ž³Ž@  ¾»³@  Č»³@ ŅøŽ»³³Ž@  Ü»³@  滳@ š¹³@ ś“޳³Ž³Ž@ ¹³@D Ą·³Ž¶Ž". Ascending diagonal lines --------------------³Ž@ D ³@ " ģź °¶Ž". A³Ž@  ,ś³Ž@ 6·ś³Ž³Ž@  @»³@ &NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  ĒcNNNNNNNNNNNNNNNNNNNNNN”””ū J ģ軳@ TøŽ ģč³Ž@ ^ ģ軳@  h»³@ r¹³@ |“޳»³³Ž@ †¹³@D ‚Ą·»³¶Ž". Vertical lines ------------------------------³Ž@ D š³@ ¤°»³¶Ž³Ž@  ®ś³Ž@ ø·ś³Ž³Ž@  Ā»³@  Ģ»³@ ÖøŽ»³³Ž@  ąŗTNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ’0NNNNNNNNNNNNNNNNNNNNNN”””ū»³@  껳@ ō¹³@ ž“޳³Ž³³Ž@ ¹³@D ƒĄ·³Ž³¶Ž". Descending diagonal lines -------------------³Ž@ D ³@ & ģč °¶Ž". D³Ž@  0ś³Ž@ :·ś³Ž³Ž@  D»³@  N ģź»³@ XøŽ ģź³Ž@ b ģź»³@  l»³@ vNĄNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ”NNNNNNNNNNNNNNNNNNNNNN”””ū¹³@ €“޳»³³Ž@ й³@ ”»¶Ž0 Default pen³Ž@ ž»¶0 Solid line³@* Ø»¶0 For the frame around the bar³@ * ²»³@  ¼±³@T ʶŽH ***********************************************************************³ŽĄ ŠĀ®$’’NÄLNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž š»NNNNNNNNNNNNNNNNNNNNNN”””ūZöV®Ņ’ūB’ū ĚB’’’ūÄų"’’’śx(’’’ł’ž,’’’ų’ž.’’’÷Wh0 ’ū6 ¶ŽP ³Ž@  … upXLabelLabelCsize Asp_ratioLdirLorgšõNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ÊNNNNNNNNNNNNNNNNNNNNNN”””ūPenXYText$Units$³Ž@P ڶŽD This defines several systems variables (in CSIZE, LDIR, etc.), and³Ž@2P 䶎' labels the text (if any) accordingly.³@ 2 ī»)³@  ų»³@  »³Ž@  »³Ž@  »³Ž@  ĄĄ³@ Ä:NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž –ŁNNNNNNNNNNNNNNNNNNNNNN”””ū *»³@"  4 µBŽö·³ls» µBŽ#,Kœž ¤³@ " >»³@  H±³@T R¶ŽH ***********************************************************************³ŽĄ \Āt€’’  ¾JtŖ ’ūB’ū ĚBÜ NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž „čNNNNNNNNNNNNNNNNNNNNNN”””ū’’’ūÄų’ū&’ū2’ū> +¶ŽTicksTicksMaxNew_maxDeltaDelta2 Multipliers Multiplier Intervals³Ž@P f¶ŽE This subprogram defines a maximum which is a nice round number, and³@PP p¶ŽE a delta whéNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž <NNNNNNNNNNNNNNNNNNNNNN”””ūich is a gos nicely into it, and a second delta for minor³@P z¶Ž tick marks.³@& „¼¤¶0 Three multipliers³Ž@& Ž ͤ¶Ž0 Read 'em³@R ˜¼ $ .5,.4,.5 ¶Ž0 1En,.5E(n-1),.2E(n-1),1E(n-1)³Ž@"R ¢ė¶Ž0 Get ready to st1ŖNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž NNNNNNNNNNNNNNNNNNNNNNN”””ūart³@6" ¬Šæ æčüŽ0 Find next bigger power of ten³Ž@06 ¶µ?¹™™™™™šģ¶Ž0 Tentative delta=Max/10³@(0 Ąņ» ™™™™¶Ž7 \ Keep reducing³Ž@*( ʁčüƒļ¶Ž7 \ New_max until it's³@** ŌĒ쐶7 > less than Max, then³Ž@** Ž»ŽĒ쐶¶Ž7 / undō|NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ZNNNNNNNNNNNNNNNNNNNNNN”””ūo the last one³Ž@* čĒ퐶7 / step³@  ņ퐳@  ü€³@ µ!Žņ» / ³Ž@ Ē퐳@  퐳@ $čüƒļ³Ž@.»Žüƒļ³Ž@8ĒģčüƒļĒ쐳Ž@B±³@TL¶ŽH *********************************************************************NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž i,NNNNNNNNNNNNNNNNNNNNNN”””ū**³ŽĄVĮ’’’D ’’–²v¼n’ūB’ū @d @deilFNCeilCeilX³Ž@`æµ! ėĄæöüčŗ³Ž@ j½³Ž ØBNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž yNNNNNNNNNNNNNNNNNNNNNN”””ū’’’’$V@ĀĀ’’  ’’ œ –¾Ž ź¾ z@"’’’ģ@ ūLP ’’’’ @ Ę @"’’’Ų@"’’’Ä(@ Ę 6@ Ę <@ ’’’¼F D@ ūV@ ū@ ’ū`@" ūn€’’’čū@ ūt@ ūz@ ū|@ ’’’ļū‚@ ޵NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž J#NNNNNNNNNNNNNNNNNNNNNN”””ūūˆ@ B@ ūš@ Dš @ B¦@ ’’’éūŖ@ ’’’čB®@ ū²P ’’’’BĄ@ ūĪ@ ūŌ@ ūŲ@ ’’’āūā@ ūź@ ūš@ !ūö@ "ūž@ #ū@ ’’’Üū @ %ū@ &ū@ 'ū @ (ū$@ )ū.@ ’’’Öū8@ +ūDŹBNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž pNNNNNNNNNNNNNNNNNNNNNN”””ū@ ,ūNP ’’’’BXP ’’’’’ūb@ /Bh@ ’’’ŠūnP ’’’’’ūt@ ’ūz@ 3ū†@ 4BŠP ’’’’’ū–@ ’’’Źūš@ ’’’ÉB @ ’’’Čū¦@ ’’’ĒDš¬@ ’’’ĘB¶@";ū¼P ’’’’’ūÄP ’’’’’ūŹP ’’’’’ūŠP ’’’’’ūÖP ’’’’’ūąP ’’’’’ūę@ Būī@ Cūō@ DūüP ’’’’_ŻNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ,ANNNNNNNNNNNNNNNNNNNNNN”””ū’ūP ’’’’’ūP ’’’’’ūP ’’’’’ū @ Iū @ JB@ Kū@ ’’’“ū @ Mū.@ Nū8@ Oū<@ PūB@ QūR@ ’’’®ū\@ Sūb@ Tūd@ Uūp@ Vūt@ Wūx@ ’’’Øū„@ Yūˆ@ ZūŒ@ [’ū’@"\B–@ ]ū¢@ ’’’¢ūØ@ ¤NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž µÖNNNNNNNNNNNNNNNNNNNNNN”””ū’’’”B®@ ’’’ ūø@ ’’’ŸDš¾P ’’’’’ūĀP ’’’’’ūČP ’’’’’ūŅP ’’’’’ūŲ@ ’ūÜ@ ’’’™ūä@ ’ūź@ iūš@"jBö@ kū@ lB@ ’’’“ū @ ’’’’Dš@ oū@ pū"@ qū.P ’’’’B2@ sū6P ’’’’B<@ u’ūB@ vBF!’’’xL!’’’8÷XNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž †ēNNNNNNNNNNNNNNNNNNNNNN”””ūR@"yū`@"’’’†Dšj@ ’’’…BZ@ |ūt@ }ūx@ ~ū€@ ū†@ €ūˆ@!’’’’’ūT@ ‚ūŽ@"ƒū@ „ū–@ ’ūž@!’’’’’ūō!’’ž؀’’żüū²€’’żōūŗ ’ūĄ T’ū–of$FNAskIWNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž Ó“NNNNNNNNNNNNNNNNNNNNNN”””ūį"NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ą…NNNNNNNNNNNNNNNNNNNNNN”””ūį"NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž Ē‹NNNNNNNNNNNNNNNNNNNNNN”””ūį"NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ōŗNNNNNNNNNNNNNNNNNNNNNN”””ūDataTitle$Legends$PiecesMult Pie_chart@  ¼ ¶Ž4 Arrays start at 1³Ž@D ¼dwŽ€£dxD€£d‡D€¤¶4 Pie data, 2 titLŌNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ”éNNNNNNNNNNNNNNNNNNNNNN”””ūles, labels³@8DĄٵ"#,B,Kœžµ1Ž’£µ2ŽK¤¶Ž4 Clear the screen³@&8(dˆ†¶Ž4 A good average number³Ž@<&2»udwĪdˆ»w»xd‡Īdˆ»w»x¶Ž4 Adjust array sizes³@<. Zæµ?Ó333333ó· L dwĒ dwĒ됶Ž4 \ chart routine to³@.> d d‡Ēµ2Legend # æµ2Ž~æŠģæčĄūū³@2.n“Ž ’š ą¶Ž4 / work on: random data³Ž@:2xdxǵTest Pie Chart¶4 / and random-length³@8:‚‚dxǵ°ĖNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  ONNNNNNNNNNNNNNNNNNNNNN”””ū(This is the subtitle)¶4 / labels.³@68ŒdŠŌdwĶÕdxĶÕd‡ĶÕ²¶4 Call the pie-chart routine³@&6–d‹–¶4 Keep softkey labels off³Ž@& ½¶Ž4 End of program³@TŖ¶ŽH ***********************************************************************³Žp…NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž 8~NNNNNNNNNNNNNNNNNNNNNN”””ū@4Ą“Ā`’’b¦xčś hŽ  ’ū0B !€’’’ųū!‚’’’šDš!‚’’’čB" ’’’¦, ’’’r4€’’’jū<€’’’būD€’’’ZūJ1’’’VL€’’’NūT€’’’Fū\€’’’>ūb€’’’6ūl" ’ūv€’’’.ū|€’’’&ū¤NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž m-NNNNNNNNNNNNNNNNNNNNNN”””ū„€’’’ūŽ€’’’ūš€’’’ū €’’’ūŖ€’’žžū“€’’žöūŗ€’’žīūĀ’’žęūŹ_chart Pie_chartData Title$Hdegends$end$ Pie_chart Pie_chartDataTitle$Legends$Image$Legend$PiecesColorIExplodeMaxlenTotal X_gdu_max Y_gdu_max @NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ^NNNNNNNNNNNNNNNNNNNNNN”””ūLabelRadius Cum_angle Rect_ratioPiece New_angle Mid_angleEdge Asp_ratioChunkPchunk³Ž@T¾¶ŽH-----------------------------------------------------------------------!³Ž@TTȶŽH This is a routine which draws a pie chartT]NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž N"NNNNNNNNNNNNNNNNNNNNNN”””ū. The data is passed !³Ž@TTҶŽH through the array Data(*), which is a one-dimensional real array !³Ž@TTܶŽH with up to fourteen elements. Fourteen, because a 9836C has 16 !³Ž@TTę¶ŽH entries in the color map and a black and white aØNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  }NNNNNNNNNNNNNNNNNNNNNN”””ūre always needed. !³Ž@TTš¶ŽH If an entry in Data(*) is negative, that is a flag which specifies !³Ž@TTś¶ŽH that the corresponding pie segment is to be exploded, i.e., pulled !³Ž@TT¶ŽH out slightly from the center of the pie. ˆøNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  (@NNNNNNNNNNNNNNNNNNNNNN”””ū !³Ž@TT¶ŽH Title$(*) is a one-dimensional, two-entry string array whose !³Ž@TT¶ŽH first element is the main title of the pie chart, and whose second !³Ž@TT"¶ŽH element is the subtitle. Either of these may be blank, ź/NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  qNNNNNNNNNNNNNNNNNNNNNN”””ūif desired. !³Ž@TT,¶ŽH Legends$(*) is a one-dimensional string array which is expected !³Ž@TT6¶ŽH to have the same number of elements in it as the Data(*) array. !³Ž@TT@¶ŽH The individual strings are the labels for the pie segments. …ŁNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  ‚ęNNNNNNNNNNNNNNNNNNNNNN”””ū These !³Ž@TTJ¶ŽH may be any desired length; the aspect ratios of the labels will !³Ž@TTT¶ŽH be reduced accordingly. Readability is the only limiting factor !³Ž@TT^¶ŽH determining label length. ]'NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  ±×NNNNNNNNNNNNNNNNNNNNNN”””ū !³Ž@TTh¶ŽH-----------------------------------------------------------------------!³Ž@*Tr¼@(£@Ž2¤¶4 Temporary strings³Ž@T*|¶ŽH Set up the plotter ----------------------------------------------------³Ž@(T†»"¶4 Initialize graphics paramS§NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ä„NNNNNNNNNNNNNNNNNNNNNN”””ūs³@.(΁Ą¶Ž4 How many elements in data?³@B.šµ2ŽCRT IDĄµ2ŽCæ €ņü¶4 Does the CRT support color?³Ž@ B¤· z¶Ž4 If so, then...³@8 ®ƒµŽINTERNAL»I¶4 Specify color-mapped device³Ž@48 ø ‚č°Ž’š X¶Ž4 \ Define the color map to³@<ųNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ×µNNNNNNNNNNNNNNNNNNNNNN”””ū4 Ā ‚źüķµŽ?ć333333»L¶4 > have colors equidistant³@0< Ģ“Ž ’š ģ¶Ž4 / around the color wheel.³@"0ÖøŽ ø¶Ž (not color CRT)³Ž@*" ąƒµŽINTERNAL»#¶4 Monochrome CRT³@*ź¹¶ (color?)³@&ō»¶4 Turn on graphics raster³Ž@$&ž»¶4 Tur:ONNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žkgNNNNNNNNNNNNNNNNNNNNNN”””ūn off alpha raster³Ž@T$¶ŽH Extract information from the array-------------------------------------³Ž@0T½½½ ¤¶Ž4 Array of "explode" flags³@&0 ĪĪ€»»y¶4 Define the array³@*&& €¶4 Initialize max label length³Ž@2*0 °Ž’ą x¶Ž4 FŪNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žXVNNNNNNNNNNNNNNNNNNNNNN”””ūor every piece in the pie³@(2 : Ē Ēæ¶4 Make pieces positive³@.( D Ēæ Ą¶Ž4 New max label length?³Ž@.N“Ž ’ą ¶Ž4 etc.³@,X ĪĄ ¶4 All positive, so take sum³Ž@.,b ‹ĄĄ쐶Ž4 This is for the labels³@4.l‹ĄķĄ쐶Ž4 dziNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž NNNNNNNNNNNNNNNNNNNNNN”””ūrawn before the WINDOW³Ž@64vŌ†Õµ?ć333333Õ€Õ†ÕÕ ‚ķÕՁĒÕ²¶@ Main title³@@6€ԃյ?ć333333Õ€Õ†ÕÕ ‚ķÕµ(Ž?īfffffgģՂĒÕ²¶@ Subtitle³@0@е!늊ėµ8@'»¶4 Isotropic units³Ž@0”»)¶4 Set degrees mode³@ž‰¶4 Radius of pie³Ž@Ø€ć9NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž>4NNNNNNNNNNNNNNNNNNNNNN”””ū¶4 Start at zero³Ž@2²µŽ?ć333333¶4 Box's distance from center³@*2¼„»¶Ž4 Pie segment char cell size³@&*ʁ°Ž’Š޶Ž4 For each piece³@*& ŠĒ ķµ1h쐶Ž4 This piece's angle³@$* Ś‚ķ萶4 Middle of segment³Ž@*$ 䀻 ¶Ž4 Unrotated coołNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž§£NNNNNNNNNNNNNNNNNNNNNN”””ūrds for MOVE³Ž@&* »¶4 Move to center of pie³Ž@$& ų Ē·Fææ» ¶E Explode?³@ $ €€» ¶4 Put the pen down³@,  » ¶Ž4 Rotate coords by cum pieces³Ž@, ·š¶Ž4 Color?³@(  č»H¶Ž4 Yes, so select a color³@( *øŽ8¶Ž (not color)ȏNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž”’NNNNNNNNNNNNNNNNNNNNNN”””ū³Ž@4 4źüźü퀀»<¶Ž4 Select a dithering density³@4 >¹¶ (color?)³@8 HµŽ?ąņ·p»Dµ1Š‚ģ»B»C»>¶H Piece³Ž@<8 RĒ ķµ(Ž?”ė…øQģņ·¶Ž4 Greater than 3.5% of pie?³Ž@$< \€€€»<¶Ž4 Black on both CRTs³@8$ f Ēčµ?ąź¶Ž4 WæŠNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žĮĮNNNNNNNNNNNNNNNNNNNNNN”””ūhere is edge of segment?³Ž@(8 p» ¶Ž4 Go to middle of segment³Ž@<( z Ēźµ(Ž?Öfffffgė» ¶Ž4 Adjust for possible explode³Ž@:< „»DģėµŽ?ęfffffg»B»C»=¶9 Black out label area³@*: Ž€» ¶Ž4 Unrotated coords for MOVE³Ž@8* ˜µ(@333333Ēæ ķĄ¶IµNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žņšNNNNNNNNNNNNNNNNNNNNNN”””ū9 Asp. ratio for labels³Ž@28 ¢µ!ŽZóµ1ņųŽ·޶Ž4 Right side of pie?³@62¬Ōµ(@ ÕÕՈՁՁæģčÕæģÕǵ ūÕ²³@6 ¶øŽź¶Ž (left side)³Ž@<ĄŌµ(@ ÕÕµ1“čՂՁՁæģčÕæģÕµ ĒūÕ²³Ž@ < ʹ¶ (right side of pie?)³@ „ńNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žāĪNNNNNNNNNNNNNNNNNNNNNN”””ūŌ¹¶ (>3.5% of pie?)³Ž@$ ŽĒ‚ėĄ¶Ž4 Value of piece³@&$ č ķ‹ģ¶4 Percentage of piece³Ž@`& ņµBŽK,":", čĒæ źæµŽX,/,,2X,K,.DD," (",K,.DD,"%)"ūū¶„ Define appropriate IMAGE³@>` üŁœžǟæ£ĄŸæ£Ą¤¶„ Convert values to string³ļ„NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž Ń’NNNNNNNNNNNNNNNNNNNNNN”””ū@R> Ōµ(@ 333333Õµ(Ž?ÜĢĢĢĢĢĶՀՃՁյ!ŽėՊµ(?ōĢĢĢĢĢĶģźÕÕ²¶8 Plot the label³@.R ėĄ萶Ž4 Update angle accumulator³@ .“Ž’Š„¶Ž4 et cetera³Ž@ $±¶4 arrivederci³Ž@T.¶ŽH *************************************************************ˆ NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž „¬NNNNNNNNNNNNNNNNNNNNNN”””ū**********³Ž(2@Ą8Ā’’ż¶$’’NBöVJŅB " ’ū0B €’’’üū €’’’ųDš €’’’ōB €’’’šDų" €’’’ģx( €’’’čž, €’’’äž. ‚’’’ÜWh0@ @ @ @ ----m%--------LžNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ·NNNNNNNNNNNNNNNNNNNNNN”””ū ¶Ž0LabelLabelCsize Asp_ratioLdirLorgPenXYText$³Ž@PB¶ŽD This defines several systems variables (in CSIZE, LDIR, etc.), and³Ž@2PL¶Ž' labels the text (if any) accordingly.³@ 2V»)³@ `»³@ ļõNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž . NNNNNNNNNNNNNNNNNNNNNN”””ū j»³Ž@ t»³Ž@ ~»³Ž@ ˆ»³@" ’ µBŽö·8» µBŽ#,Kœž ¤³@ "œ»³@ ¦±³ \ installment. Tab to the 20th³@<. ¼›µ!޽Ÿ ¤¶Ž,$ / column so as to not cover up the³Ž@<Ɠޒ)J¶Ž, / moon.³@8м ,"It is a dark and stormykÓNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ;NNNNNNNNNNNNNNNNNNNNNN”””ū’’’’!T@ĀĀ’’fD’’ œ ®ī`®„Œ’’’ģ’ūL0Ž šĘ ’’’Ų’’’Ä(0Ę 6PĘ <€’’’¼F D ’ūV ’ū’’’õ’ū` ’ūn ’ū’ūt’ūz’ū|’’’ļ’ū‚INNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žHhNNNNNNNNNNNNNNNNNNNNNN”””ū’ūˆB’ūšĚ B¦’’’é’ūŖ’’’čB®’ū²BĄ’ūĪ’ūŌ’ūŲ’’’ā’ūā’ūź ’ūš!’ūö"’ūž#’ū’’’Ü’ū %’ū&’ū'’ū (’ū$)’ū.’’’Ö’ū8+’ūD)gNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž{YNNNNNNNNNNNNNNNNNNNNNN”””ū,’ūN-BX.’ūb/Bh’’’Š’ūn1’ūt2’ūz3’ū†4BŠ5’ū–’’’Ź’ūš’’’ÉB ’’’Č’ū¦’’’Ē̬’’’ĘB¶;’ū¼<’ūÄ=’ūŹ>’ūŠ?’ūÖ’’’Ą’ūąA’ūęB’ūīC’ūōD’ūüEI³NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž\WNNNNNNNNNNNNNNNNNNNNNN”””ū’ū’’’ŗ’ūG’ūH’ū I’ū JBK’ū’’’“’ū M’ū.N’ū8O’ū<P’ūBQ’ūR’’’®’ū\S’ūbT’ūdU’ūpV’ūtW’ūx’’’Ø’ū„Y’ūˆZ’ūŒ[’ū’\B–]’ū¢’’’¢’ūØ“NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žofNNNNNNNNNNNNNNNNNNNNNN”””ū’’’”B®’’’ ’ūø’’’ŸÄš¾b’ūĀc’ūČd’ūŅe’ūŲf’ūÜ’’’™’ūäh’ūźi’ūšjBök’ūlB’’’“’ū ’’’’Äšo’ūp’ū"q’ū.rB2s’ū6’’’ŒB<u’ūBvBFw’ūLxBą’NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž:5NNNNNNNNNNNNNNNNNNNNNN”””ūRy’ū`’’’†Äšj’’’…BZ|’ūt}’ūx~’ū€’ū†€’ūˆ ’’’’ūT‚’ūŽƒ’ū„’ū–…’ūž †’ūō’’’y’ū؈’ū²‰’ūŗŠ’ūĄ ‹’ū–Œ’ūŹ’’’sBŚŽ’ūčBö’ūü‘ÄšoYNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž NNNNNNNNNNNNNNNNNNNNNN”””ū’’ū’’’mB ”’ū,•B8–’ūD—BN˜’ūX’’’gB`š’ūh›’ūtœ’ūx’ū|ž’ūˆ’’’a’ūŒ ’ū”’ū ¢’ū¤£’ūؤ’ū“File$XIOopsSource$ FNFile_exists Destination$FNAskMessageB ŚNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž“NNNNNNNNNNNNNNNNNNNNNN”””ūombed X_gdu_max Y_gdu_max FNData_pointText$CsizeYLorgAnglePolygonPolygonsSideSidesPenDxDy Define_deltas Define_deltasTempNewPreviousScreenXminXmaxXrangeYminYmaxYrangeDecadeUnitsPerMantissaExponent TemperatureRÖįNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž£¢NNNNNNNNNNNNNNNNNNNNNN”””ūotation New_curve New_curveSpinSpinDeltaDelta FNIntensityLem Pen_controlLemRoomDeskChair BookshelfTableObject$RoomDeskChair BookshelfTableObjectsArrayLetterPointsFLAXHorizonTreeTree2 Sun_diameter Sun_deltaPhiBirdPosį3NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žöńNNNNNNNNNNNNNNNNNNNNNN”””ūition_angleDistanceThetaR Left_angleX2Y2 Right_angleX3Y3SizeUdc Old_chars$CharsSigmaInfinityArrowBoxSigmaInfinityArrowBoxNew_udcLdirLabelBlackMessage$Pal1Pal2Pal3Pal4 New_order Pause_timePalPalTextTextBar5&NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žÅĄNNNNNNNNNNNNNNNNNNNNNN”””ūRatioDataTitle$FillGlabels$Blabels$CrtGroupsBarsJGroupNMode$Between Bar_chartLegends$PiecesMult Pie_chartTransformation Modified_lem ConnectivityMask First_point Last_point Initialize Initialize Display_lem Display_lemKņ NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žÕžNNNNNNNNNNNNNNNNNNNNNN”””ūnob_isrKnob_isrKbd_isrKbd_isr Rotation_2dSxSy Scaling_2dTxTyTranslation_2dShxShy Shearing_2d Connectivity@  ¼ ³Ž@: ¼dŒ Ž€€£3 Ž€€£d €€£ Ž€€¤³@":¼dŽ)Ž€€&ėNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ęĻNNNNNNNNNNNNNNNNNNNNNN”””ū£d!£d!£d‘!¤³@ "(d“•³@ 2d••³@ <µ?©™™™™™š»+’d—½³@F»’d™½³Ą P..–³ŽĄL Z—¶Ž> -------------------------------------------------------------³Ž@Lddƒ» Ž----³Ž@` n»Ž Ž--µ2rotate»»----¶Ž8 Modify the angle of rotation.......ŚNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ³œNNNNNNNNNNNNNNNNNNNNNN”””ū....................³Ž@` xRĄƒģ³@ ‚dšŌRÕdŒĶÕ²³@` Œ»ŽÕdŒĶµ2scale»»Ž----¶Ž8 Compress/expand LEM in X or Y..........................³Ž@` –ĄŠ®d¤³@,  d€ĄŽ·¤³¶Ž! (shift key pressed)³Ž@ ,Ŗd›³Ž@ “dœĄµ?©™™™™™šģ萳@* ¾øŽAONNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž €­NNNNNNNNNNNNNNNNNNNNNN”””ūĄ¶Ž (shift key not pressed)³Ž@*Čd›Ąµ?©™™™™™šģ萳@ Ņdœ³Ž@ ܹ¶ (shift pressed?)³@ ędŌd›ÕdœÕdŒĶÕ²³@` š»Ž›Õdœµ2 translate»»Žesse¶Ž4 Move LEM in X or Y.................................³Ž@` śĄŠ®d¤³@, d€ĄŽ·¤³ ¶Ž!BNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž :NNNNNNNNNNNNNNNNNNNNNN”””ū (shift key pressed)³Ž@ ,dž€³Ž@ dŸĄµŽ?©™™™™™šģ됳@* "øŽĄµ¶Ž (shift key not pressed)³Ž@*,džĄµŽ?©™™™™™šģ³Ž@ 6dŸ€³Ž@ @¹¶ (shift pressed?)³@ Jd ŌdžÕdŸÕdŒĶÕ²³@` T»ŽžÕdŸµ2shear»»Žt pr¶Ž8 Shear the LEM..............”NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž * NNNNNNNNNNNNNNNNNNNNNN”””ū............................³Ž@` ^ĄŠ®d¤³@, hd€ĄŽ·¤³¶Ž! (shift key pressed)³Ž@ ,rd”€³Ž@ |d¢ĄµŽ?©™™™™™šģ됳@* †øŽĄµ¶Ž (shift key not pressed)³Ž@*d”ĄµŽ?©™™™™™šģ³Ž@ šd¢€³Ž@ ¤¹¶ (shift pressed?)³@ ®d£Ōd”Õd¢ÕdŒĶÕ²AbNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žXNNNNNNNNNNNNNNNNNNNNNN”””ū³@ ø»³@ ĀĪdĪdŒĪ»„»y³Ž@ĢdĪĪ»z»y³@ Öd••³@ ąŗ³ŽĄL ź™¶Ž> -------------------------------------------------------------³Ž@LōĄĄ» Ž----³Ž@` ž»Ž»µ2R»»Ž----¶Ž< Rotation mode......................................ŸŗNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žLiNNNNNNNNNNNNNNNNNNNNNN”””ū........³Ž@` dƒµ2rotate³@` »Žroµ2S»»Ž----¶Ž< Scaling mode...............................................³Ž@` dƒµ2scale³Ž@` &»Žscµ2T»»Ž----¶Ž< Translation mode...........................................³Ž@` 0dƒµ2 tr™ NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žÓNNNNNNNNNNNNNNNNNNNNNN”””ūanslate³Ž@` :»Ž trµ2H»»Ž----¶Ž< Shear mode.................................................³Ž@` Ddƒµ2shear³Ž@` N»Žshµ2 »»Ž----¶Ž< Start over.................................................³Ž@` XdĪ3Ī»z»y³@  bd••³@N l–öNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž.āNNNNNNNNNNNNNNNNNNNNNN”””ū»ŽĪ»z¶Ž; Oops......................................................³@N v‹µŽ?„zįG®{½$³@ €»³@ Š‘µ2ŽMode: Ÿdƒ¤³Ž@ ”ŗ³ŽĄH ž•¶Ž: ---------------------------------------------------------³Ž@ HØ»³@ ²»%³Ž@ ¼ µ!°------³Ž@ šNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž{±NNNNNNNNNNNNNNNNNNNNNN”””ū Ęd dŽČ³Ž@ ŠddČd‚dČ»³@ Śd‘ ‚dŽČ³Ž@ äd‘dČd‘‚dČ»³@ī“Ž Čd‘‚d³Ž@ ųŗ³ŽĄJ “¶Ž< -----------------------------------------------------------³Ž@ J »"³@ »³@  µ!ėµ!޵!ėµ!Ž»³@*3΁»{»y³@4 µ!°<łNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žH€NNNNNNNNNNNNNNNNNNNNNN”””ūy³µ!³Ž@ >  3Č£ ‚3Ȥ³@H“Ž Č£ ‚3ȳŽ@ R dŽĶ¤³@ \dĪ3Ī»z»y³@ f»)³@ pdƒµ2rotate³@z‘µ2ŽMode: Ÿdƒ¤³ŽĄ „5¶Ž ³Ž@>޼ 3 1.5,1, 2.5,2, 2.5,3, 1.5,4, -1.5,4, -2.5,3³@@>˜¼ 4 -2.5,2, -1.5,1, -2.5,1, 2.5,1, 2.5,-2Ö^NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŃNNNNNNNNNNNNNNNNNNNNNN”””ū, -2.5,-2³Ž@>@¢¼ 3 -2.5,0, -4.5,-4, -5,-4, -4,-4, 2.5,0, 4.5,-4³@>>¬¼ 2 5,-4, 4,-4, -.5,-2, -1,-3, 1,-3, .5,-2³ŽĄ>¶¤¶Ž³Ž@JĄ¼ 2 1,2, 2,3, 3,4, 4,5, 5,6, 6,7, 7,8 ¶Ž> Octagon³Ž@FJʼ 2 9,10, 10,11, 11,12, ¬NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žā&NNNNNNNNNNNNNNNNNNNNNN”””ū12,9 ¶Ž> Box³Ž@JFŌ¼ 2 13,14, 14,12, 15,16 ¶Ž> Left leg³@LJ޼ 2 17,18, 18,11, 19,20 ¶Ž> Right leg³Ž@HLč¼ 2 21,22, 22,23, 23,24 ¶Ž> Noz2NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž·uNNNNNNNNNNNNNNNNNNNNNN”””ūzle³@ Hņŗ³Ž@ ü½³Ž@T ¶ŽH ***********************************************************************³ŽĄĀØ@ ’’T¶HØŖ ’ūB ’ūĚ’ū$’’’ū’ū*2d Rotationg2d Rotatigm’NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž„DNNNNNNNNNNNNNNNNNNNNNN”””ūn_2dThetaArraySifeCosin Rotation_2d Rotation_2dThetaArraySineCosine³Ž@T¶ŽH This subprogram takes a 3x3 real array and converts it into a rotation³Ž@RT$¶ŽG matrix for two-dimensional transformations. T÷NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž”zNNNNNNNNNNNNNNNNNNNNNN”””ūhe angular mode assumed³@FR.¶Ž: for the SIN and COS will be that of the calling context.³Ž@ F8搳@ B搳@ LĪ»|»y³Ž@VČ³Ž@`‚Č됳@j‚Č³Ž@t‚‚Ȑ³Ž@~±³@Tˆ¶ŽH ***********************************************\NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž §KNNNNNNNNNNNNNNNNNNNNNN”””ū************************³ŽĄ’ĀŲ`’’Ę„~FŲn’ūB ’ūĚB  Sca Scaling_2d Scaling_2dSxSyArray³Ž@Rœ¶ŽG This subprogram takeIbNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ņNNNNNNNNNNNNNNNNNNNNNN”””ūs a 3x3 real array and converts it into a scaling³@8R¦¶Ž- matrix for two-dimensional transformations.³@8°Ī»|»y³Ž@ŗČ³Ž@ÂȐ³Ž@α³@TŲ¶ŽH ***********************************************************************³ŽĄāĀNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž Į)NNNNNNNNNNNNNNNNNNNNNN”””ūč`’’Ņ”~Rčn’ūB’ūĚB(_2dTranslation_2dTxTyTranslation_2dArray³Ž@Jģ¶Ž? This subprogram takes a 3x3 real array and conveĀóNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž X¾NNNNNNNNNNNNNNNNNNNNNN”””ūrts it into a³@DJö¶Ž9 translation matrix for two-dimensional transformations.³@DĪ»|»y³Ž@ ƒČ³Ž@ƒ‚Ȑ³Ž@±³@T(¶ŽH ***********************************************************************³ŽĄ2Ā’’žz`’’Ę~~+…NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž kNNNNNNNNNNNNNNNNNNNNNN”””ūF†n’ūB ’ūĚB  She Shearing_2d Shearing_2dShxShyArray³Ž@J<¶Ž? This subprogram takes a 3x3 real array and converts it into a³@BJF¶Ž6 shearing mGßNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž>ÜNNNNNNNNNNNNNNNNNNNNNN”””ūatrix for two-dimensional transformations.³Ž@BPĪ»|»y³Ž@Z‚Č³Ž@d‚Ȑ³Ž@n±³ ·NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ķNNNNNNNNNNNNNNNNNNNNNN”””ū’’’’ž@ĀĀ’’’’čbD’’ R„0"˜0²Œ’’’ģ’ūL0Ž šĘ ’’’Ų’’’Ä(0Ę 6PĘ <€’’’¼F D ’ūV ’ū’’’õ’ū` ’ūn ’ū’ūt’ūz’ū|’’’ļ’ū‚»xNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž*ćNNNNNNNNNNNNNNNNNNNNNN”””ū’ūˆB’ūšĚ B¦’’’é’ūŖ’’’čB®’ū²BĄ’ūĪ’ūŌ’ūŲ’’’ā’ūā’ūź ’ūš!’ūö"’ūž#’ū’’’Ü’ū %’ū&’ū'’ū (’ū$)’ū.’’’Ö’ū8+’ūD)gNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŅNNNNNNNNNNNNNNNNNNNNNN”””ū,’ūN-BX.’ūb/Bh’’’Š’ūn1’ūt2’ūz3’ū†4BŠ5’ū–’’’Ź’ūš’’’ÉB ’’’Č’ū¦’’’Ē̬’’’ĘB¶;’ū¼<’ūÄ=’ūŹ>’ūŠ?’ūÖ’’’Ą’ūąA’ūęB’ūīC’ūōD’ūüEI³NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žLNNNNNNNNNNNNNNNNNNNNNN”””ū’ū’’’ŗ’ūG’ūH’ū I’ū JBK’ū’’’“’ū M’ū.N’ū8O’ū<P’ūBQ’ūR’’’®’ū\S’ūbT’ūdU’ūpV’ūtW’ūx’’’Ø’ū„Y’ūˆZ’ūŒ[’ū’\B–]’ū¢’’’¢’ūØ“NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž°NNNNNNNNNNNNNNNNNNNNNN”””ū’’’”B®’’’ ’ūø’’’ŸÄš¾b’ūĀc’ūČd’ūŅe’ūŲf’ūÜ’’’™’ūäh’ūźi’ūšjBök’ūlB’’’“’ū ’’’’Äšo’ūp’ū"q’ū.rB2s’ū6’’’ŒB<u’ūBvBFw’ūLxBą’NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žę'NNNNNNNNNNNNNNNNNNNNNN”””ūRy’ū`’’’†Äšj’’’…BZ|’ūt}’ūx~’ū€’ū†€’ūˆ ’’’’ūT‚’ūŽƒ’ū„’ū–…’ūž †’ūō’’’y’ū؈’ū²‰’ūŗŠ’ūĄ ‹’ū–Œ’ūŹ’’’sBŚŽ’ūčBö’ūü‘ÄšoYNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žÕNNNNNNNNNNNNNNNNNNNNNN”””ū’’ū’’’mB ”’ū,•B8–’ūD—BN˜’ūX’’’gB`š’ūh›’ūtœ’ūx’ū|ž’ūˆ’’’a’ūŒ ’ū”’ū ¢’ū¤£’ūؤ’ū“’’’[’ū¦’ūΧBŌØ’ūŚ©’ūāŖBč’’’U’ūņ=9NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž€ENNNNNNNNNNNNNNNNNNNNNN”””ū’’’TĚų­’ūž®’ū destinatiof$FNAskeessageBFile$XIOopsSource$ FNFile_exists Destination$FNAskMessageBombed X_gdu_max Y_gdu_max FNData_pointText$CsizeYLorgAnglePolygonPolygonsSideSidesPenDxDy Define_deltas Defu£NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž³tNNNNNNNNNNNNNNNNNNNNNN”””ūine_deltasTempNewPreviousScreenXminXmaxXrangeYminYmaxYrangeDecadeUnitsPerMantissaExponent TemperatureRotation New_curve New_curveSpinSpinDeltaDelta FNIntensityLem Pen_controlLemRoomDeskChair BookshelfTableObject$«NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž£JNNNNNNNNNNNNNNNNNNNNNN”””ūRoomDeskChair BookshelfTableObjectsArrayLetterPointsFLAXHorizonTreeTree2 Sun_diameter Sun_deltaPhiBirdPosition_angleDistanceThetaR Left_angleX2Y2 Right_angleX3Y3SizeUdc Old_chars$CharsSigmaInfinityArrowBoxSŃxNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž {NNNNNNNNNNNNNNNNNNNNNN”””ūigmaInfinityArrowBoxNew_udcLdirLabelBlackMessage$Pal1Pal2Pal3Pal4 New_order Pause_timePalPalTextTextBarRatioDataTitle$FillGlabels$Blabels$CrtGroupsBarsJGroupNMode$Between Bar_chartLegends$PiecesMult PiepFNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž Å(NNNNNNNNNNNNNNNNNNNNNN”””ū_chartTransformation Modified_lem ConnectivityMask First_point Last_point Initialize Initialize Display_lem Display_lemKnob_isrKnob_isrKbd_isrKbd_isr Rotation_2dSxSy Scaling_2dTxTyTranslation_2dShxShy Shearing_2d Connectivity MæŗNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž öNNNNNNNNNNNNNNNNNNNNNN”””ūaster_cubeTrigSineCosineCubeOld_cubeTemp1Temp2PointCube@* ¼ ¶Ž* Arrays start at 1 by default³@,*¼d„ Ž€ €¤¶* Master data array³Ž@4,¼dŽ)Ž€€¤¶* How to connect the points?³@<4(¼dŽ)Žd¦d§Žg£d3jNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž oŽNNNNNNNNNNNNNNNNNNNNNN”””ūØg¤¶0 Faster than calculation³Ž@F<2¼d© Ž€ €£dŖ € €£dŒ €€£d« €€£d¬ €€¤³@"F<¼ !¤¶* Speed up plotting³Ž@,"F»)¶* So trig arrays are in degrees³Ž@,Pd“•¶* Set up program³@:Zµ?©™™™™™š»+’d—½¶* Change angle frfåNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž \æNNNNNNNNNNNNNNNNNNNNNN”””ūom top (phi)³Ž@::dd«Ī»|»y¶*& \ Both transformation matrices start³Ž@6:nd¬Ī»|»y¶*# / start out as identity matrices.³@6x» ¶* forever³Ž@ ‚d«ČRdØĒ¶Ž* \³Ž@4 Œƒd«ČRd§Ē됶* \ Rotate the cube around the³@"4 –ƒd«ČRd§Ē¶Ž* / Y-axis.±hNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ģNNNNNNNNNNNNNNNNNNNNNN”””ū³Ž@"  ƒƒd«ČRdØĒ¶Ž* /³Ž@ Ŗ‚‚d¬ČNdØĒ¶Ž* \³Ž@4 “‚ƒd¬ČNd§Ē됶* \ Rotate the cube around the³@"4 ¾ƒ‚d¬ČNd§Ē¶Ž* / X-axis.³Ž@" ȃƒd¬ČNdØĒ¶Ž* /³Ž@: ŅdŒĪd«Īd¬Ī»„»y¶* Concatenate the transformations³Ž@0: Üd©Īd„ĪdŒĪ»„»y¶1 Modify the da[{NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž:ŻNNNNNNNNNNNNNNNNNNNNNN”””ūta array³Ž@60 ꑵ2ŽPhi:ŸN¤¶* How many degrees from vertical³@:6 šRR…čüµ1ŽhŽ*# Cause cube to be rotated next time³@: ś»¶* Erase old cube³@  µ!°rase o¶Ž0 \³Ž@ d­ dŽČ¶Ž0 \³@$  ‚dŽČ·Č¶Ž¶Ž& (draw) ! \³Ž@6$"d­d©Čd­‚d©Č»Ó"NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žҚNNNNNNNNNNNNNNNNNNNNNN”””ū¶0 \ Draw the rotated image³@B6 ,øŽd©Č¶Ž1 (move) ! / of the cube.³@B6d­d©Čd­‚d©Č»¶0 /³Ž@* @¹¶ (draw?) ! /³@* J“Ž (draw¶Ž0 /³Ž@,T»Ž (dr¶Ž* End of rotate/draw loop³ŽĄL,^—¶Ž> ---Ÿ¬NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žį«NNNNNNNNNNNNNNNNNNNNNN”””ū----------------------------------------------------------³Ž@6LhNNĄčüµ1ŽhŽ* Update phi according to knob³@06rN€ó·čüµNNµ1h萶Ž* Ensure positiveness³Ž@*0|ŗ¶Ž* Go back, young man, go back!³ĄJ*†“¶Ž< ---------------------------------------±dNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž“ųNNNNNNNNNNNNNNNNNNNNNN”””ū--------------------³Ž@0J»"¶*# Set up various graphics parameters³@&0š»¶* Turn on graphics screen³Ž@$&¤…ė……ė…»¶* Isotropic units³Ž@:$®d„΁»{»y¶Ž*% Make array (esp. 4th col.) to be one³@<:ø ‰°Ž{»y¶Ž¶Ž*$ Nine points: eight vertices, ceüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž‡ÉNNNNNNNNNNNNNNNNNNNNNN”””ūnter³Ž@< Ā  d„Č£ ‚d„Č£ ƒd„Ȥ³@ Ģ“Ž „Č£ ‚d¶Ž* et cetera³Ž@4 Ö dŽĶ¤¶*$ How to proceed from point to point?³Ž@:4ą€dØĒ€ńŽ· How¶Ž*" If trig arrays undefined, define.³Ž@8: ź €µ1g° How¶Ž¶Ž* Not 1 to 360, because of MODs³Ž@68 ō d§Ē 搶Ž*# \ ArraļņNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž^NNNNNNNNNNNNNNNNNNNNNN”””ūy fetches are substantially³@86 ž dØĒ 搶Ž*% / faster than SIN or COS evaluation³@"8 “Ž æ¶Ž¶Ž* and so forth³@"¹³@2R€¶*% \ Looking toward the cube at origin³@"2&N€¶* / from the +y axis³ŽĄ" 0®¶Ž ³Ž@J:¼ . -1,-2,-3, 1,-2,-3, ĮjNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž-oNNNNNNNNNNNNNNNNNNNNNN”””ū 1,2,-3, -1,2,-3 ¶Ž: bottom face³Ž@FJD¼ . -1,-2,3, 1,-2,3, 1,2,3, -1,2,3 ¶Ž: top face³@JFN¼ . 0,0,0 ¶Ž: center point³Ą>JX¤¶Ž0 First column: next point; Second column: Draw?³Ž@D>b¼Ū6NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žxÅś@"’’’Ä(@ Ę 6@ Ę <@ ’’’¼F D@ ūV@ ū@ ’ū`@" ūn ’’ūöū@ ūt@ ūz@ ū|@ ’’’ļū‚@ JNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž[3NNNNNNNNNNNNNNNNNNNNNN”””ūūˆ@ B@ ūš@ Dš @ B¦@ ’’’éūŖ@ ’’’čB®@ ū²P ’’’’BĄ@ ūĪ@ ūŌ@ ūŲ@ ’’’āūā@ ūź@ ūš@ !ūö@ "ūž@ #ū@ ’’’Üū @ %ū@ &ū@ 'ū @ (ū$@ )ū.@ ’’’Öū8@ +ūDŹBNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž hNNNNNNNNNNNNNNNNNNNNNN”””ū@ ,ūNP ’’’’BXP ’’’’’ūb@ /Bh@ ’’’ŠūnP ’’’’’ūt@ ’ūz@ 3ū†@ 4BŠP ’’’’’ū–@ ’’’Źūš@ ’’’ÉB @ ’’’Čū¦@ ’’’ĒDš¬@ ’’’ĘB¶@";ū¼P ’’’’’ūÄP ’’’’’ūŹP ’’’’’ūŠP ’’’’’ūÖP ’’’’’ūąP ’’’’’ūę@ Būī@ Cūō@ DūüP ’’’’_ŻNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž =QNNNNNNNNNNNNNNNNNNNNNN”””ū’ūP ’’’’’ūP ’’’’’ūP ’’’’’ū @ Iū @ JB@ Kū@ ’’’“ū @ Mū.€’’ūīū8@ Oū<@ PūB@ QūR€’’ūęū\@ Sūb@ Tūd@ Uūp@ Vūt@ Wūx@ ’’’Øū„@ Yūˆ@ ZūŒ@ [’ū’@"\B–@ ]ū¢@ ’’’¢ūØ@ /‹NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž `NNNNNNNNNNNNNNNNNNNNNN”””ū’’’”B®@ ’’’ ūø@ ’’’ŸDš¾P ’’’’’ūĀP ’’’’’ūČP ’’’’’ūŅP ’’’’’ūŲ@ ’ūÜ@ ’’’™ūä@ ’ūź@ iūš@"jBö@ kū@ lB@ ’’’“ū @ ’’’’Dš@ oū@ pū"@ qū.P ’’’’B2@ sū6P ’’’’B<@ u’ūB@ vBF@ wūL@"xBHõNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž —÷NNNNNNNNNNNNNNNNNNNNNN”””ūR@"yū`@"’’’†Dšj@ ’’’…BZ@ |ūt@ }ūx@ ~ū€@ ū†@ €ūˆ@!ø’ūT@ ‚ūŽ@"ƒū@ „ū–@ ’ūž@!Ś’ūō@"’’’yūØ@ ˆū²@ ‰ūŗ@ ’ūĄ@!Ō’ū–"’’ūfXŹ@ ’’’sBŚ"’’ū"$č@ Bö@ ūü@ ‘Dš@ HÖNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ¤ĘNNNNNNNNNNNNNNNNNNNNNN”””ū’ū0ģB @ ”ū,P ’’’’B8@ –ūD0BN@ ˜ūXP ’’’’B`@ ’ūh@ ›ūt@ œūx@ ’ū|@ žūˆ@ ’’’aūŒ@ ’ū@ ”ū @ ¢ū¤@ ’ūØ0€’ū“"’’śĀ ę’ūĪ!@ 0Ō!@8Ś"’’ųā@ā"’’÷ĀLč"’’÷BdņŹWNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žń•NNNNNNNNNNNNNNNNNNNNNN”””ū"’’öĀpų€’’öŗūž0˜’ūLdestinatiof$FNAskGeessageBPABIOldCmapßfNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž¤NNNNNNNNNNNNNNNNNNNNNN”””ūį"NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žåŖNNNNNNNNNNNNNNNNNNNNNN”””ūPhiTheta5šNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž֛NNNNNNNNNNNNNNNNNNNNNN”””ūį"NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žƒČNNNNNNNNNNNNNNNNNNNNNN”””ūTransformation Connectivity InitializeKnob_isr Connectivity M—NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž°łNNNNNNNNNNNNNNNNNNNNNN”””ūaster_cubeTrigSineCosineCubeOld_cubeTemp1Temp2PointCube@* ¼ ¶Ž* Arrays start at 1 by default³@.*¼d„ Ž€ €£ Ž€€£ Ž€€¤³@4.¼dŽ)Ž€€¤¶* How to connect the points?³@<4(¼’’’’d¦d§Žgi„NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž)nNNNNNNNNNNNNNNNNNNNNNN”””ū£dØg¤¶0 Faster than calculation³Ž@F<2¼d© Ž€ €£dŖ € €£dŒ €€£d« €€£d¬ €€¤³@F<¼ € €¤³@"F¼ !¤¶* Speed up plotting³Ž@,"P»)¶* So trig arrays are in degrees³Ž@,Zd“•¶* Set up program³@:dµ?©™™™™™š»+’d—W¢NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž_NNNNNNNNNNNNNNNNNNNNNN”””ū½¶* Change angle from top (phi)³Ž@::nd«Ī»|»y¶*& \ Both transformation matrices start³Ž@6:xd¬Ī»|»y¶*# / start out as identity matrices.³@6‚» ¶* forever³Ž@ Œ‚ļč³@  –»³Ž@  ‚ļčüė»H³Ž@ Ŗd«ČRdØĒ¶Ž* \³Ž@4 “ƒd«ČRd§Ē됶‘NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žO NNNNNNNNNNNNNNNNNNNNNN”””ū* \ Rotate the cube around the³@"4 ¾ƒd«ČRd§Ē¶Ž* / Y-axis.³Ž@" ȃƒd«ČRdØĒ¶Ž* /³Ž@ Ņ‚‚d¬ČNdØĒ¶Ž* \³Ž@4 ܂ƒd¬ČNd§Ē됶* \ Rotate the cube around the³@"4 ꃂd¬ČNd§Ē¶Ž* / X-axis.³Ž@" šƒƒd¬ČNdØĒ¶Ž* /³Ž@: śdŒĪd«Īd¬Ī»„»y¶* Concaż½NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž|=NNNNNNNNNNNNNNNNNNNNNN”””ūtenate the transformations³Ž@: Īd©Ī»z»y³@0 d©Īd„ĪdŒĪ»„»y¶1 Modify the data array³Ž@60 ‘µ2ŽPhi:ŸN¤¶* How many degrees from vertical³@:6 "RR…čüµ1ŽhŽ*# Cause cube to be rotated next time³@ : ,»³Ž@ 6ƒ…»J³Ž@ @ µ!°’ü0³Ž@ĢfNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žlNNNNNNNNNNNNNNNNNNNNNN”””ū Jd­ dŽČ³Ž@ Td­d©Čd­‚d©Č ‚dŽČ»&³@ ^“Ž ’üņ³Ž@ hń·\³Ž@ rĶ»M³@ |øŽr³Ž@ †Ķ»M³@ ¹³@ š‚ļčü뻳Ž@ ¤ƒ„»J³Ž@ ® µ!°’ų䳎@ ød­ dŽČ³Ž@ Ād­Čd­‚Č ‚dŽČ»&³@ Ģ“Ž ’ųسŽ@,Ö»Žž¶ŽYÉNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž _2NNNNNNNNNNNNNNNNNNNNNN”””ū* End of rotate/draw loop³ŽĄL,ą—¶Ž> -------------------------------------------------------------³Ž@6LźNNĄčüµ1ŽhŽ* Update phi according to knob³@06ōN€ó·ĀNNµ1h萶Ž* Ensure positiveness³Ž@*0žŗ¶Ž* Go back, young man, go back!³ĄJ*“•µNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  aNNNNNNNNNNNNNNNNNNNNNN”””ū¶Ž< -----------------------------------------------------------³Ž@ J»³@0 »"¶*# Set up various graphics parameters³@0&ƒµŽINTERNAL»I³@0ŠėŠŠėŠ»³@ :„»³Ž@ D»$³Ž@ Nˆ»³Ž@$ Xµ?ə™™™™šµ?ə™™™™š€€……ƒ»%³@$bƒ…»J³Ž@$ä!NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž 9PNNNNNNNNNNNNNNNNNNNNNN”””ūl…ė……ė…»¶* Isotropic units³Ž@:$vd„΁»{»y¶Ž*% Make array (esp. 4th col.) to be one³@<:€ ‰°Ž’ōĶŽ*$ Nine points: eight vertices, center³Ž@< Š  d„Č£ ‚d„Č£ ƒd„Ȥ³@ ”“Ž ’ōжŽ* et cetera³Ž@4 ž dŽĶ¤¶*$ How to proceed from point to poin2sNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  ĒNNNNNNNNNNNNNNNNNNNNNN”””ūt?³Ž@4Ø Ķ£ͤ³@²Ķ»M³@&¼»¶* Turn on graphics screen³Ž@:&ʀdØĒ€ńŽ·D¶Ž*" If trig arrays undefined, define.³Ž@8: Š €µ1g°’š<¶Ž* Not 1 to 360, because of MODs³Ž@68 Ś d§Ē 搶Ž*# \ Array fetches are substantially³@86 ä dØĒ 搶Ž*%YNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž “öNNNNNNNNNNNNNNNNNNNNNN”””ū / faster than SIN or COS evaluation³@"8 ī“Ž ’š¬¶Ž* and so forth³@"ų¹³@2R€¶*% \ Looking toward the cube at origin³@"2 N€¶* / from the +y axis³ŽĄ" ®¶Ž ³Ž@J ¼ . -1,-2,-3, 1,-2,-3, 1,2,-3, -1,2,-3 ¶Ž: bottom face³Ž@FJā{NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žĘ„NNNNNNNNNNNNNNNNNNNNNN”””ū*¼ . -1,-2,3, 1,-2,3, 1,2,3, -1,2,3 ¶Ž: top face³@JF4¼ . 0,0,0 ¶Ž: center point³Ą>J>¤¶Ž0 First column: next point; Second column: Draw?³Ž@P>H¼ D 1,-2, 2,-1, 3,-1, 4,-1, 1,-1, 5,-1, 6,-1, ;“NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žõ”NNNNNNNNNNNNNNNNNNNNNN”””ū7,-1, 8,-1, 5,-1, 9,-1,³Ž@0PR¼ % 2,-2, 6,-1, 3,-2, 7,-1, 4,-2, 8,-1³Ą0 \¶Ž ³Ž@Bf¼ 6 0,1,0, 0,0,0, 0,1,0, .3,.3,.3, 0,1,0, .3,.3,.3, 0,1,0³Ž@BBp¼ 7 0,0,1, 0,1,0, 0,0,1, 0,1,0, 0,0,1, 0,1,0, 0,0,1, 0,1,0³@BBz¼ 6 0,0,0, 0,1,0, 0,1,0, .3,.ˆūNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž¤.NNNNNNNNNNNNNNNNNNNNNN”””ū3,.3, .3,.3,.3, 0,1,0, 0,1,0³Ž@BB„¼ 7 0,0,1, 0,0,1, 0,1,0, 0,1,0, 0,0,1, 0,0,1, 0,1,0, 0,1,0³@*BŽŗ¶Ž* Go back, young man, go back!³@*˜½¶Ž* Finis³Ž  hhD @h @h    €Ņ–NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž—NNNNNNNNNNNNNNNNNNNNNN”””ū€€  +16660 MOVE Jtop,Im#6670 DRAW J+1,Iright1*6680 END IF ! (if northwest) 6690 IF Cross THEN 6700 MOVE J,Ileft#6710 DRAW J+1,I(3NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žĀLNNNNNNNNNNNNNNNNNNNNNN”””ū’’’’Q<@ĀĀ’’P’’ŒünPn" ’’ż" ’’ż" ’’ż" ’’ż" ’’ż@ ¶Ž File "Routines".³@4¶Ž( Copyright 1983, Hewlett-Packard Company³Ž@ 4¶Ž All Rights ReįGNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žń}NNNNNNNNNNNNNNNNNNNNNN”””ūserved³Ž@T (¶ŽI ************************************************************************³Ą2Įč’’ ”®\čŖ ’ū0’ū"’ū.’’’ū’ū:agpoint Dada_pointeemory Dada_points das`÷NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žhźNNNNNNNNNNNNNNNNNNNNNN”””ūt_pointI FNData_point Data_pointMemory Data_points Last_pointI³Ž@<¼I *Žd£!¤³Ž@:FĒ€ń·޶Ž(% Read data only if you haven't before³@0: P‹°Ž޶޶Ž( One hundred points total³@00 Z Ǥ¶(! Read _ŠNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž[ŪNNNNNNNNNNNNNNNNNNNNNN”””ūa data point into the array³@ 0 d“ޤ¶(! R¶Ž( et cetera³Ž@0 n¹¶($ end of conditionally-performed code³Ž@.0x‹ļč¶( Make it work again and again³@,.‚Ēŗ¶( Return the appropriate point³@P,Œ¼ E 16.10, 16.25, 16.25, 16.28, 16.36, 16.31, 16.27 QNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žˆNNNNNNNNNNNNNNNNNNNNNN”””ū, 16.08, 16.10, 16.06³@PP–¼ E 16.07, 16.17, 16.14, 16.26, 16.34, 16.40, 16.56, 16.60, 16.44, 16.51³@PP ¼ E 16.35, 16.41, 16.28, 16.19, 16.30, 16.24, 16.27, 16.44, 16.44, 16.57³@PPŖ¼ E 16.60, 16.70, 16.72, 16.66, 16.58, 16.62, 16.46, 16.33, 16.34, brNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž=¹NNNNNNNNNNNNNNNNNNNNNN”””ū16.36³@PP“¼ E 16.45, 16.52, 16.56, 16.77, 16.89, 16.80, 16.96, 16.80, 16.74, 16.77³@PP¾¼ E 16.69, 16.55, 16.65, 16.62, 16.67, 16.68, 16.81, 16.88, 16.87, 17.07³@PPȼ E 17.16, 17.16, 16.94, 16.98, 16.83, 16.83, 16.71, 16.81, 16.83, 16.84³@PPҼ EŲ$NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž-‡NNNNNNNNNNNNNNNNNNNNNN”””ū 16.81, 16.98, 17.05, 17.23, 17.30, 17.34, 17.14, 17.22, 17.16, 16.96³@PPܼ E 17.02, 16.99, 16.84, 17.06, 16.96, 17.15, 17.30, 17.37, 17.39, 17.51³@PPę¼ E 17.32, 17.47, 17.29, 17.17, 17.10, 17.07, 17.06, 17.09, 17.13, 17.20³@ Pš½³Ž@T ś¶ŽH *****5jNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ¶NNNNNNNNNNNNNNNNNNNNNN”””ū******************************************************************³ŽĄ ĀŽ$’’B:¾‚Žš#’ū0’ūÅ0  ’’’ūÄ萒’’śx’’’łÉ"’’’ų.’’’÷ 6 x’ū| ‚† Œ’ūf»NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž KåNNNNNNNNNNNNNNNNNNNNNN”””ū –Å0š  ¤ ŖÄč® “xø’ū>’ūF’ūL’ūV’ūZ’’’ź’ū` č’ūĀ üĢ ’ūÖ $Å0ą @ź JÄčō ^xž’ūh’ūnarcXYRadius_Stard_End_ ec1åNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž xŌNNNNNNNNNNNNNNNNNNNNNN”””ūtArcArcXYRadius_Start_End_ Intervals_Penup_Aspect_AspectPenup IntervalsEndStartRadiusStepI³Ž@R¶ŽG This subroutine draws an arc of a circle with the center at X,Y and a³@RR¶ŽF radius of "Radius". The arczŌNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž įCNNNNNNNNNNNNNNNNNNNNNN”””ū starts at a position of "Start" degrees³Ž@PR"¶ŽD and ends at "End" degrees and has a total of "Interval" individual³Ž@RP,¶ŽF line segments. The greater "Intervals" is, the rounder the arc will³Ž@TR6¶ŽH look, but also the longer the routine wi¹µNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ŅrNNNNNNNNNNNNNNNNNNNNNN”””ūll take to finish. If "Penup"³Ž@RT@¶ŽG is non-zero, the pen will be picked up before the arc is started. If³@RRJ¶ŽG not, it will be left down (assuming it was down before). Oftentimes,³@RRT¶ŽG you want to draw a straight line to the arc you JNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž‡!NNNNNNNNNNNNNNNNNNNNNN”””ūare starting to draw.³@PR^¶ŽD If "Radius" is positive, the arc will proceed counterclockwise; if³Ž@"Ph¶Ž negative, clockwise.³Ž@4"r‰æź« ¶Ž; ON +1-NPAR³@ 4| ³@ †³@ ³@ š³@ ¤³@ ®³@4 øæéŚNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž“NNNNNNNNNNNNNNNNNNNNNN”””ūź«¶Ž; NPAR+1-³Ž@4µŽ?š³@̵ސ³@Öµ8Ž@v€³@ąźüµŽ@ķæ³Ž@ ꁐ³@ ōµŽ?š³@ ž»)³@ ·)³?š»³@.µŽņüōü÷·³Ž;µ8@v€č³Ž@..µŽóüĖNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž“NNNNNNNNNNNNNNNNNNNNNN”””ūõü÷·³Ž;µ8@v€ź³Ž@.&źü퐳Ž@ 0搳@ :°퐳޳Ž@ Dģæģčæģč»&³Ž@N“Žæģč³Ž@X±³@Tb¶ŽH ***********************************************************************³ŽĄlĀDĄ’’ųšR¤D%ŗNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž /NNNNNNNNNNNNNNNNNNNNNN”””ū6’ū0 ’ūÅ0’’’ūÄč ’’’śx$’’’łÉ.’ū4 ’ū> D ’ūL ’ūV’’’ó’ū`’ūf’ūp’ūz’ū„’ūŽ’’’ķ’ū 'tancFad_lineFad_lineX1 KNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žõ|NNNNNNNNNNNNNNNNNNNNNN”””ūY1X2tancFat_lineFat_lineX1Y1X2Y2 ThicknessDeltaDistanceAngleFNAtan Cos_angle Sin_anglePerpCos_perpSin_perp Semithick DirectionYDx³Ž@Tv¶ŽH This routine makes a line from point X1,Y1ĘÖNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žĘMNNNNNNNNNNNNNNNNNNNNNN”””ū to point X2,Y2 simulating a³Ž@RT€¶ŽG pen whose tip is width "Thickness". Delta is the approximate (it may³@RRжŽG be tweaked) distance between actual lines. The smaller delta is, the³@PR”¶ŽD darker and more accurate the simulation will be, b ²NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž_ŚNNNNNNNNNNNNNNNNNNNNNN”””ūut the execution³Ž@Pž¶Ž time will suffer.³@ Ø»)³@ ²źü‚īźü‚ī运³@¼ ÓźÕźÕ²³Ž@ Ę æ³@ Š æ³@ Ś µ!Z萳Ž@ ä æ³@ ī æ³@ ųķæ퐳@ ‚퐳@  ³@ »³@  ė°ސ³Õ²³Ž@ *‚ī‚īźæ³Mģč ģźģč ģź»&³Ž@ Hģč ģčģč ģč»&³Ž@ RøŽģč³Ž@ \ģč ģčģč ģč»&³Ž@ fģč ģźģč ģź»&³Ž@ p¹³@  zś³Ž@ „“Ž³Ž ģź³Ž@ޱ³@T˜¶ŽH ***************************************************¾NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž9øNNNNNNNNNNNNNNNNNNNNNN”””ū********************³ŽĄ¢Āö$’’ģ¢2øö’ū0’ūÅ0’’’ūÄč’’’śx$’’’łÉ,’’’ų8’’’÷ B ’ūH ’ūR ’ūX ’ūb’ūl’’’ń’ūr’ū|ԚNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ‰NNNNNNNNNNNNNNNNNNNNNN”””ū’ū†’ūˆ’ūŒ’ū–  ThiFat_arcFat_arcXYRadiusTheta1Theta2 Delta_theta ThicknessDelta SemithickPerp1 Cos_perp1 Sin_perp1Perp2 Cos_perp2 Sin_perp2RDx DirectionThetaĘŽNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž·NNNNNNNNNNNNNNNNNNNNNN”””ū³Ž@R¬¶ŽG This routine makes an arc centered around point X,Y and radius Radius³@NR¶¶ŽB going from Theta1 to Theta2 by Delta_theta, simulating a plotter³Ž@RNĄ¶ŽG pen whose tip is width "Thickness". Delta is the approximate (it may³@RRʶŽG ’µNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž )†NNNNNNNNNNNNNNNNNNNNNN”””ūbe tweaked) distance between actual lines. The smaller delta is, the³@PRŌ¶ŽD darker and more accurate the simulation will be, but the execution³Ž@P޶Ž time will suffer.³@ č»)³@ ņ ‚퐳@ ü  ķæķµ=<%ĀhIv‚ꐳŽ@ µ!Z萳Ž@  æé¼NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž |ÕNNNNNNNNNNNNNNNNNNNNNN”””ū³@  搳@ $µ!Z萳Ž@ .搳@ 8搳@ B ź č °=<%ĀhI³Ž@ L ‚īźü‚īźæ³Ž@ V·‚ī³Ž@" `æģč ģźæģč ģź»&³Ž@" j°č ģź³Ž@tæģčæģč»&³Ž@ ~“Žģč³Ž@" ˆæģčģčæģčģč»&³Ž@" ’øŽæJNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž OäNNNNNNNNNNNNNNNNNNNNNN”””ūģ³Ž@" œæģčģčæģčģč»&³Ž@" ¦ė°Žģč³Ž@°æģčæģč»&³Ž@ ŗ“Žģč³Ž@" Äæģč ģźæģč ģź»&³Ž@" ι³@  Ųś³Ž@ ā“Ž³Žč ģ³Ž@ģ±³@Tö¶ŽH *************************************************************\×NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ÖsNNNNNNNNNNNNNNNNNNNNNN”””ū**********³ŽĄĀž ’’öŖ²BžŖ ’ū0 ’ū’ū ’ū‚’’’ū’ū"lgtter_is `lotter_is CrtFNAscMessage  Plotter_is Plotter_isCrtFNAskMessage‰ƒNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž åBNNNNNNNNNNNNNNNNNNNNNN”””ū³Ž@D ¶Ž9 This subroutine defines the plotting device to be used.³@ This prompts the user to put the paper iī8NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž?ņNNNNNNNNNNNNNNNNNNNNNN”””ūn the plotter in the³Ž@LJę¶ŽA orientation, and to define the corners of the paper, BEFORE the³@.Lš¶Ž# PLOTTER IS statement is executed.³@.śæ€ńŽ·PLOT³Ž@ µ"ސ³@øŽ"޳Ž@  ³@ "¹³@,ĄĄ» ³ŽR ³Ž@  6»ŽĄ»µ2H»»Ž( NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ĆNNNNNNNNNNNNNNNNNNNNNN”””ūteme³Ž@ @µ2Ž horizontally³Ž@  J»Ž hµ2V»»޳Žme³Ž@ Tµ2Ž vertically³Ž@ ^»Ž v³Ž@ hµ2ސ³@ r»³@ |½$³@X †‘µ2ŽPut the paper in the plotterŸŸµ2Ž%, define the corners, and hit 'CONT'.¤³Ž@ X½³Ž@ š‘„³Ž@ ¤„žNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žYNNNNNNNNNNNNNNNNNNNNNN”””ū»"³@ ®µ1Įµ2HPGL»#³@ø±³@T¶ŽH ***********************************************************************³ŽĄ ĢĀ^€’’¬ œ^ś’ū0’ūÅ0’’’ūÄč&’ū0ųHNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žj”NNNNNNNNNNNNNNNNNNNNNN”””ū8’ūB Å0L V’’’õÄč`’’’ōxj’’’óÉt_gdu_max Y_gdu_maxGde_xmidGde_ymidG_enitsGduGduGdu X_gdu_max Y_gdu_maxGdu_xmidGdu_ymidG_unitsGdu_xmaxGdu_ymaxUdu_xminUdu_xmaxUdu_yminUdu_ymaxShow81NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žó6NNNNNNNNNNNNNNNNNNNNNN”””ū³Ž@PÖ¶ŽD This returns Xright, Yhigh and their respective midpoints in GDUs.³Ž@FPą¶Ž: Note that if Gdu_xmid is defined, Gdu_ymid must be also.³Ž@$Fź¼: ££ £ £ £ £ ¤³Ž@$ō€ń· ³Ž@ ž‹ĄĄ쐳Ž"5NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žĄNNNNNNNNNNNNNNNNNNNNNN”””ū@ ‹ĄķĄ쐳Ž@¹³@ ³@ &³@ 0æ‚ņŽ·ķĄ³Ž@ :µ?ąģ³Ž@ Dµ?ąģ³Ž@N¹³@X±³@Tb¶ŽH ***********************************************************************³ŽĄlĀˆ ’’¾4vFˆx†NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž•TNNNNNNNNNNNNNNNNNNNNNN”””ūn’ū0’ū ’ū corresponsePPausePause Graphics_Graphics³Ž@Rv¶ŽF This indicates that the output is finished, so push 'CONT' to go on.³Ž@R€æ€ńŽ·This³Ž@  Š€³ÄŻNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž¦eNNNNNNNNNNNNNNNNNNNNNN”””ū@ ”øŽ³Ž·³Ž@  ž³@ ع³@²·³Ž·³Ž@  ¼½$³@ Ę»³@ Š»³@ ڹ³@:䑵2Ž+Push 'CONTINUE' when you're ready to go on.¤³Ž@:ī·2Ž+³Ž@  ų‚½#³@ »³@  »³@ ¹³@  ½³Ž@ *‘„³Ž@ 4·³Ž+³Ž@  >»³@ H»³@ R¹³¤GNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž¶[NNNNNNNNNNNNNNNNNNNNNN”””ū@\±³@Tf¶ŽH ***********************************************************************³ŽĄpĀ’`’’t>ö|’ę’ū0 ’ūÅ0’’’ū’ū&’ū,’ū2’ū< @žFNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž …jNNNNNNNNNNNNNNNNNNNNNN”””ū ’ūJ’’’õ’ūT ’ūZ_`lotEnd_`lotCrtcopyDevicePausededEnd_plotEnd_plotCrtCopyDevicePauseFNAskExpandedGdu X_gdu_max Y_gdu_maxSetgu Load_paper³Ž@Rz¶ŽF This is just a housekeeping routine ĶNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž Š9NNNNNNNNNNNNNNNNNNNNNN”””ūthat takes care of some sundries³Ž@RR„¶ŽG at the end of a plot. "Crt" is a logical variable that tells whether³@PR޶ŽD the plot was done on the CRT or not. "Copy" is a variable that is³Ž@LP˜¶ŽA returned to the calling routine that tells you w gNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ćNNNNNNNNNNNNNNNNNNNNNN”””ūhether you want³@TL¢¶ŽH another copy of the plot on the hard-copy plotter (Note that if Crt is³Ž@PT¬¶ŽD true, Copy is forced to be false). "Device" is the address of the³Ž@P¶¶Ž DUMP DEVICE.³Ž@Ą· ³Ž@ Źсղ³Ž@  Ō€³@6 ŽÓµ2ŒNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž zŸNNNNNNNNNNNNNNNNNNNNNN”””ūShall I 'DUMP GRAPHICS'?Õµ2ŽNOÕ²·"Dev³Ž@*6 čÓµ2Ž...'EXPANDED'?Õµ2ŽNOÕ²³Ž@* ņĄٵ2#,Kœž¤³@ ü½ µ2 Dump device?½¤³Ž@ ·µ2 ³Ž@  » ³Ž@ øŽ ³Ž³Ž@  $»!³Ž@ .¹³@  8»³@ B¹³@ LøŽ³³Ž³Ž@  V»³@ `€»³Ž@ j#NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž I®NNNNNNNNNNNNNNNNNNNNNN”””ūŃ Õ Õ²³Ž@  t Ō²³Ž@ ~ »³@ ˆ·»³³Ž@@ ’Óµ2Ž%Do you want another copy of the plot?Õµ2NOÕ²³Ž@@ œ·Óµ2Ž Ѳ³Ž@ ¦¹³@ °¹³@ ŗ±³@T ĶŽH ***********************************************************************³ŽĄ ĪĀžC†NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žżNNNNNNNNNNNNNNNNNNNNNN”””ū$’’NJöVžŅ’ū0’ū Å0’’’ūÄč"’’’śx(’’’łÉ,’’’ų.’’’÷ 0 l, or&... You he oLabelLabelCsize Asp_ratioīŽNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž/ĢNNNNNNNNNNNNNNNNNNNNNN”””ūLdirLorgPenXYText$³Ž@P Ų¶ŽD This defines several systems variables (in CSIZE, LDIR, etc.), and³Ž@2P ā¶Ž' labels the text (if any) accordingly.³@ 2 ģ»)³@  ö»³@  »³Ž@  »³Ž@  »³Ž@  1±NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žĀNNNNNNNNNNNNNNNNNNNNNN”””ū»³@"  ( µ2Žö·bels» µ2Ž#,Kœž ¤³@ " 2»³@  <±³@T F¶ŽH ***********************************************************************³ŽĄ PĮ@ ’’ü¬¶DŖ ’ū0’ūÅ0’ū’’’ū°NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž;óNNNNNNNNNNNNNNNNNNNNNN”””ū’ūtaFNAtanatanYXbadians FNAtanAtanYXRadiansArctan³Ž@R Z¶ŽF This figures the arctangent of Y/X in the correct quadrant and takes³Ž@RR d¶ŽF care of multiples of 90 deūƒNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žn NNNNNNNNNNNNNNNNNNNNNN”””ūgrees where X=0. The value returned is in³Ž@R n¶Ž current units.³Ž@ xėææńü³Ž@  ‚»)³@  Œ€ń·æń³Ž@< –µ!ŽZµ1“€óüģčü€öü쐶( If X=0 and Y=0, Arctan=0.³Ž@<  øŽ!ŽZ³Ž@( Ŗķæµ1“€óüģčµ1h€ņü€óü÷üģ萳@( “¹³@ ¾·ķ泎@  ŁNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž]‘NNNNNNNNNNNNNNNNNNNNNN”””ū Č»*³@ ҵČ@L„Üc˰퐳Ž@ ܹ³@  ęŗ³@  š½³Ž@T  ś¶ŽH ***********************************************************************³ŽĄ Āö`’’¢ŗDöŖ ’ū0’ū Å0’’’ūNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žÄNNNNNNNNNNNNNNNNNNNNNN”””ū’ū$’ū(’ū,ubfaceNew_einNew_ma`MinScaleScaleSurfaceNew_minNew_maxMinMax Range_recip³Ž@N ¶ŽB This routine scales a matrix such that it will have a new lowest³Ž@BN ¶Ž6 value of New_min and a new¦ČNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž÷7NNNNNNNNNNNNNNNNNNNNNN”””ū highest value of New_max.³Ž@JB "‘µ"ŽKœžµ"ŽScaling the surface array from ££µ" to ££µ"Ž.¤³Ž@J ,ĶĄ³Ž@ 6ĶĄ³Ž@, @ń·¶Ž Array is completely flat³@, JĪĪ»z»y³Ž@ T׳@ ^¹³@ hĪĪ»»y³@ rźüźü퐳@ |Ī\ļNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž¢dNNNNNNNNNNNNNNNNNNNNNN”””ūλ޻y³@ †ĪĪ»Œ»y³@  ‘„³Ž@  š±³@T ¤¶ŽH ***********************************************************************³ŽĄ ®Ā’’PČÖxŅ’ū0’ū ’ū$’’’ūÅ0.’’’śVJNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž‘UNNNNNNNNNNNNNNNNNNNNNN”””ū8’’’łÄčB’’’ųxL’’’÷É SetguSetguG_unitsShowGdu_xmaxGdu_ymaxUdu_xminUdu_xmaxUdu_yminUdu_ymax³Ž@> ø¶Ž3 This simulates the 9845 graphics sh]NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žkNNNNNNNNNNNNNNNNNNNNNN”””ūtatement SETGU.³@$> ¼3 ££££££ ¤³Ž@$ Ģ€€»³@ Ö±³@T ą¶ŽH ***********************************************************************³ŽĄ źĀN’’PśÖxNŅ’ū0’ū bNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ²ZNNNNNNNNNNNNNNNNNNNNNN”””ū’ū$’’’ūÅ0.’’’ś8’’’łÄčB’’’ųxL’’’÷É SetuuSetuuG_unitsShowGdu_xmaxGdu_ymaxUdu_xminUdu_xmaxUdu_yminUdu_ymax³Ž@> ō¶Ž3 This sž NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ē NNNNNNNNNNNNNNNNNNNNNN”””ūimulates the 9845 graphics statement SETUU.³@$> ž¼3 ££££££ ¤³Ž@$  ·3 ³Ž@ »³@ øŽ»³Ž@ &»³@ 0¹³@ :±³@T D¶ŽH ***********************************************************************³ŽĄ NĀ&€@æNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž Ō8NNNNNNNNNNNNNNNNNNNNNN”””ū’’¤Ņ”&ś’ū0’ū Å0’’’ūÄč ’ū&.’ū8 Å0B L’’’õÄčV’’’ōx`’’’óÉjw XleftXraghtYlow YhighG_enitsGdu_`maxGduShow FNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž MÆNNNNNNNNNNNNNNNNNNNNNN”””ūShowXleftXrightYlowYhighG_unitsGdu_xmaxGdu_ymaxUdu_xminUdu_xmaxUdu_yminUdu_ymaxShow³Ž@P X¶ŽD This simulates the system command SHOW, but saves the variables so³Ž@0P b¶Ž$ the routines Setgu a¦TNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ~žNNNNNNNNNNNNNNNNNNNNNN”””ūnd Setuu work.³Ž@$0 l¼$ ££ £ £ £ £ ¤³Ž@$ v€ń· ³Ž@ €‹ĄĄ쐳Ž@ Š‹ĄķĄ쐳Ž@ ”¹³@  ž ³@  Ø ³@  ² ³@  ¼ ³@  Ę ³@  Š»³@ ڱ³@T 䶎H *******************************************************}NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž+ĶNNNNNNNNNNNNNNNNNNNNNN”””ū****************³ŽĄ īĀ*€’’¦Ö–*ś’ū0’ūÅ0’’’ūÄč$’ū*2’ū< Å0F P’’’õÄčZ’’’ōxd’’’óÉnifdowXlefdYlowXraghtYhig`G_uniŠ“NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žüNNNNNNNNNNNNNNNNNNNNNN”””ūtsgdu_xmaxWindowWindowXleftYlowXrightYhighG_unitsGdu_xmaxGdu_ymaxUdu_xminUdu_xmaxUdu_yminUdu_ymaxShow³Ž@R ų¶ŽF This simulates the system command WINDOW, but saves the vari^YNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žIFNNNNNNNNNNNNNNNNNNNNNN”””ūables so³Ž@0R ¶Ž$ the routines Setgu and Setuu work.³Ž@$0 ¼$ ££ £ £ £ £ ¤³Ž@$ €ń· ³Ž@ ‹ĄĄ쐳Ž@ *‹ĄķĄ쐳Ž@ 4¹³@  > ³@  H ³@  R ³@  \ ³@  f €³@  p»³@ z±³@T „¶ŽH ************* ßNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žzwNNNNNNNNNNNNNNNNNNNNNN”””ū**********************************************************³ŽĄ ŽĀ8@ ’’ĄäzD8n’ū0 ’ūÅ0’ū"ed P Pen_speed Pen_speedSpeedDevice_Device³Ž@PNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž/$NNNNNNNNNNNNNNNNNNNNNN”””ū ˜¶ŽD This sends an HPGL plotter the command to draw at a maximum speed.³Ž@P ¢æńŽ·This³Ž@ ¬µ1ŽĮ³@ ¶øŽ1ŽĮ³Ž@  Ą³@  ʹ³@@ Ō€ń·Į³Ž½ µ&What should the maximum plotter speed?½¤³Ž@&@ ށµŽ?ąčæĄµ!Ž$Ą³@&& čٵ2#,f¾NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žNNNNNNNNNNNNNNNNNNNNNN”””ūKœžµ2ŽVSæµ2Ž;ūū¤³Ž@& ņ±³@T ü¶ŽH ***********************************************************************³ŽĄĮ `’’¼ ČöÄ ę’ū0’ū Å0’’’ū’ū&’ū.0 Ž<ŅõNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž…‚NNNNNNNNNNNNNNNNNNNNNN”””ū’ūJ0JV0’ūb’’’õh ’ūn0ś’ūt’ū„’ūŒld$AnsweultFNAskAsk Question$TimeoutDefault$Answer$ Take_default Take_default Process_key Process_keySpinSpinKey$Convert_answerMessageConvert_aĆNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž¶³NNNNNNNNNNNNNNNNNNNNNN”””ūnswer³Ž@R¶ŽF This is a Yes-or-no question-answering function. The question is³Ž@RR¶ŽF in to the function, asked of the user, and the default answer can be³Ž@RR$¶ŽF accepted. If the user answers ip„NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žćąNNNNNNNNNNNNNNNNNNNNNN”””ūntelligibly, that answer is returned³Ž@NR.¶ŽB through the function name; 1 for yes, and 0 for no. If the user³Ž@PN8¶ŽE responds unintelligibly, the computer beeps, draws attention to the³@RPB¶ŽG fact that an illegal answer was given, re-asks tĘyNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŠŃNNNNNNNNNNNNNNNNNNNNNN”””ūhe question, and will³@.RL¶Ž" again accept the default answer.³Ž@R.V¶ŽG If Timeout is passed the question will be asked for that specified³@TR`¶ŽH number of seconds before the default answer is assumed. If Timeout is³Ž@FTj¶Ž: not passed9öNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žĄļNNNNNNNNNNNNNNNNNNNNNN”””ū, it will wait indefinitely for user response.³Ž@Ft¼@ ¤³@~æƒńŽ·¤³t ³Ž@ ˆ»i’½³@  ’‘¤³@ œ»’ ½³ŽĄD¦ –¶Ž4 "...at warp 10, we're goin' nowhere mighty fast..."³ŽĄ D° »o³@ ŗ Ą³@ Ä ż» Ž...a³Ž@X λ޻ ޵1’æ»Ö{NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž óŽNNNNNNNNNNNNNNNNNNNNNN”””ū»0, w¶Ž4 It was a non-ASCII keypress........................³Ž@XŲ ‚‚ż» ޵1’³Ž@`ā»Ž» ޵2E»µ2ŽC»»Žt wa¶Ž2 Enter or Continue?...............................³Ž@ `ģ–³Ž@H ö»Ž» ޶Ž5 Illegal non-ASCII key........................7NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ¦NNNNNNNNNNNNNNNNNNNNNN”””ū.......³@ H½$³@  »¶ (select key$[2,2])³@L »Ž (¶Ž9 ASCII keystroke.........................................³@LĄٵ2#,Kœž ¤³@  (»¶ (select key$[1,1])³@ 2» ³@ <¹¶ (if npar=3)³Ž@PF» ¶ C Now that we're in this loop, ŃMNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž •¼NNNNNNNNNNNNNNNNNNNNNN”””ūwe'll stay until we get a good answer³@ P P‘Ÿ„³Ž@ Zµ2»"³@ dĄĄ³@ nµ2Žń·³ tĄĄ³Ąx » ń·³Ž@j ‚»Žń·µ2YES»µ2ŽY»µ2Ž1»»Žstay¶Ž 0 Affirmative....................................³Ž@ jŒŗ³@h –»ެ”NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž  +NNNNNNNNNNNNNNNNNNNNNN”””ūń·µ2NO»µ2N»µ2Ž0»»ŽŽst¶Ž1 Negative........................................³@ h €ŗ³@L Ŗ»Žń·¶Ž9 Huh?!?..................................................³@6L“ѵ2%Please answer with a „YES€ or a „NO€.Õ²³Ž@ 6 ¾»³@ Č»Ž%Pl½ĖNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ?NNNNNNNNNNNNNNNNNNNNNN”””ū³ŽĄ Ņ‘„³Ž@ Ü»o³@ ꥥ³@ š –³Ž@ ś½³Ž@T ¶ŽH ***********************************************************************³ŽĄĀ’’śH@ ’’¾°zBøn’ū0’ūÅ0’ū ®²NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žjINNNNNNNNNNNNNNNNNNNNNN”””ūMesMessageMessageMessage$Wait_Wait³Ž@P¶ŽD This subroutine displays a message on the DISPlay line of the CRT,³Ž@RP"¶ŽG usually to notify the user of an error, or that a section of code has³@LR,¶ŽA finiŻĀNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žYxNNNNNNNNNNNNNNNNNNNNNN”””ūshed executing, etc. If Wait_ is not defined [passed], the³@TL6¶ŽH computer will beep, and the message will be displayed for two seconds,³Ž@RT@¶ŽG then disappear. If Wait_ is defined, the computer will beep if it is³@PRJ¶ŽD greater than or eqéNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž~vNNNNNNNNNNNNNNNNNNNNNN”””ūual to zero, it will not beep if it is less than³Ž@TPT¶ŽH zero, and in either case, the wait will be the absolute value, rounded³Ž@NT^¶ŽB to the nearest millisecond, unless it is zero, in which case the³Ž@0Nh¶Ž$ message will not be erased at al‹ėNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žMGNNNNNNNNNNNNNNNNNNNNNN”””ūl.³Ž@ 0r‘¤³@ |æńŽ·mess¶Ž& Default:³@  †½$³@" ‚½#¶& Wait 2 seconds, then³@ " š‘„¶Ž& clear the message.³@ ¤øŽ¶Ž&¶Ž (npar=2)³@> ®€õ·&¶Ž½$¶&( Note that the rounding occurs AFTER the³Ž@>> øæƒėĄ¶Ž&) BEEP. This allows "negativ™NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žNNNNNNNNNNNNNNNNNNNNNN”””ūe zero" which³@>> Ā€ņ·ƒėĄ¶Ž&* not only will not beep, but it will leave³Ž@6> ̽#¶&) the message displayed, avoiding the WAIT³@86 ֑„¶Ž&* and DISP. A "negative zero" is simulated³Ž@H8 ą¹¶< (if wait>0) ! by passing a negative number which will³`NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž+%NNNNNNNNNNNNNNNNNNNNNN”””ū³Ž@>Hź¹¶3 (if npar=1) ! round to zero; e.g., -.0001.³@>ō±³402 DATA 16.35, 16.41, 16.28, 16.19, 16.30, 16.24, 16.27, 16.44, 16.44, 16.57*O403 DATA 16.60, 16.70, 16.72, 16.66, 16.58, 16.62, 16.46, 16.33, 16.34, 16.36*O404 DATA 16.45, 16–NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž²²NNNNNNNNNNNNNNNNNNNNNN”””ū’’’’@ĀĀ’’’’ėā”’’dĘhüŠNhʀ’’’˜Eś€’’’Eś€’’’ˆEś€’’’€Eś "’’ž"’’ü€ €’’üxEś("’’ü`<*"’’üH$0"’’ü00:@"’’ü<<@’’üHF0 ¬`’’üJN"’’śˆl’’śtLV0„’ūv€’’ślū€@ kóNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žƒNNNNNNNNNNNNNNNNNNNNNN”””ūū„@ ū0–’–0’ūœ02’ū¦@ ’’’éū²0d’¼@ ūĘ0®’Š0”’ūŚ@ ’ąnatCyan$IRedGreenBlueAdditive SubtractiveJPoint New_pointUnitBlack$Green$White$ Pen_image2SurpriseSurpriseHueģNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŌŠNNNNNNNNNNNNNNNNNNNNNN”””ūDummyAdditive Subtractive Surprise2All_doneHere@N ¶ŽB "CIRCLES" to demonstrate non-dominant writing to the frame buffer³Ž@0N¶Ž$ and some color map tricks³Ž@ 0¶Ž³Ž@, (-NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žēįNNNNNNNNNNNNNNNNNNNNNN”””ū¼£Ž£Ž¤³@,,2¼£ ޣޤ³@ ,<¶Ž³Ž@. F»¶* Turn off the graphics and alpha³Ž@,.P»¶* screens to prevent "flashing"³Ž@ ,Z»)³@ d¶Ž³Ž@* n»"¶* Defaults for graphics system³@*xƒµ@MNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž÷ßNNNNNNNNNNNNNNNNNNNNNN”””ūŽINTERNAL»I³@(‚ƒ…»J¶Ž* Set non-dominant mode³Ž@ (Œ¶Ž³Ž@ – µ1Žæ¶*\³@. µ1Žˆæ¶* > For changing text colors³@.Ŗ µ1Ž‹æ¶*/³@ “¶Ž³Ž@ ¾‚ė‚‚ė‚»³@ ȶ޳Ž@P ҶŽD************** Create the Surprise Palette *********ußNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ÄīNNNNNNNNNNNNNNNNNNNNNN”””ū****************³Ž@ Pܶ޳Ž@@ ꀵŽ?ć333333µ?ć333333µ?ć333333»M¶Ž* Gray background³Ž@2@š½¶Ž*" Make sure you read the right data³ŽĄ(2ś¶Ž DATA for surprise palette³Ž@"(¼ .9 ¶ Pen 1³Ž@""¼ .2 ¶ Pen 2³Ž@""RōNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ‘½NNNNNNNNNNNNNNNNNNNNNN”””ū¼ .5 ¶ Pen 3³Ž@"""¼ .7 ¶ Pen 4³Ž@"",¼ .1 ¶ Pen 5³Ž@""6¼ .8 ¶ Pen 6³Ž@""@¼ .3 ¶ Pen 7³Ž@ "J¶Ž³Ž@ T‡°Ž’šę³Ž@  ^ ¤³@ h»L³Ž@r“Ž’šŗ³Ž@ |¶Ž³Ž@gØNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ¢ŒNNNNNNNNNNNNNNNNNNNNNN”””ū †ε?ć333333»{»y¶Ž*\³@ˆĶ»M¶* \³Ž@$š‰Ķ»M¶* > Pens for labels³@$¤Ī€»{»y¶* /³Ž@®ŠĶ»M¶*/³@ ø¶Ž³Ž@ ƒ‚Ķ»K³@ ̶޳Ž@P Ö¶ŽD******************* Create the Additive Palette ********************³Ž@ Pą¶Ž³Ž@p•NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ;NNNNNNNNNNNNNNNNNNNNNN”””ū ꀇ°Ž’ąR³Ž@ ō€Ą³@ žĄ³@ ‚Ą³@ »M³Ž@“Ž’ą³Ž@ &¶Ž³Ž@ 0΁»{»y¶*\³@:ˆĶ»M¶* \³Ž@&DĪ€»{»y¶* > Pens for labels³@&N‰Ķ»M¶* /³Ž@XŠĶ»M¶*/³@ b¶Ž³Ž@( lƒ‚Ķ»K¶* Read %ąNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž *NNNNNNNNNNNNNNNNNNNNNN”””ūadditive palette³Ž@ (v¶Ž³Ž@4 €Ąٵ2#,Bœžµ1Ž’£µ!ŽK¤¶* Clear the screen³@ 4жŽ³Ž@N ”¶ŽC************** Create the Subtractive Palette *********************³@ Nž¶Ž³ŽĄB Ø ¼4 A,"Pen ",D,XX,D,X,D,X,D,55X,A,"Pen ",D,XX,D,X,D,X,D³Ž@FB²ä9NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž]yNNNNNNNNNNNNNNNNNNNNNN”””ū¶Ž: IMAGE for printing pens to screen; B's simulate CHR$ for³Ž@LF¼¶Ž@ selecting printing colors that appear only in their own display³Ž@ Lʶ޳Ž@2 Р΁»{»y¶* Define unit vector for RGB to³Ž@2*ڶŽ* CMY conversion³@ *䶎*³Ž@4 !°’Ąó*NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žnHNNNNNNNNNNNNNNNNNNNNNN”””ū >¶Ž* Create subtractive palette³@4 ųƒ°Ž’Š t³Ž@6 ČȐ¶*# Read a point from additive palette³@6  “Ž’Š ,³Ž@ Ī ĪĪ»ƒ»y³Ž@   ¶Ž ³Ž@L *¶Ž @ The next line prints out PEN INTENSITY values for both palettes³Ž@:L 4ˆó· › œž£%kNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žkNNNNNNNNNNNNNNNNNNNNNN”””ū£Č£‚Č£ƒČ£ ££Č£‚Č£ƒȤ³Ž@: >Ķ»M¶*³Ž@H“Ž’Ą ³Ž@ R¶Ž³Ž@ \› ¤¶* Restore green text³@ f¶Ž³Ž@ p΁»{»y¶*\³@*zˆĶ»M¶* \ Create pens for labels³@*„Ī€»{»y¶* /³Ž@މĶ»M¶*/³@ ˜¶Ž³Ž@* ¢ƒ‚Ķ»ß}NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž+ZNNNNNNNNNNNNNNNNNNNNNN”””ūK¶* Read subtractive palette³@ *¬¶Ž³Ž@L ¶¶Ž@********************* Build the image **************************³Ž@ LĄ¶Ž³Ž@( ʀͻM¶* Load additive palette³Ž@&(Ō»¶* Flashing is over - turn³Ž@&Ž»¶* on the displays³Ž@ č¶Ž³Ž@ ņ,xNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž~ NNNNNNNNNNNNNNNNNNNNNN”””ū€€»¶*\³@üµ!» ¶* \³Ž@*µ?ą€»¶Ž* > First circle³Ž@*»H¶Ž* /³Ž@»D»B»>¶*/³@ $¶Ž³Ž@. .€» ¶Ž* Restore coordinate orientation³@.8€€»¶*\³@Bµ1–» ¶* \³Ž@*Lµ?ą€»¶Ž* > Second circle³@*V‚»[ĘNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žM8NNNNNNNNNNNNNNNNNNNNNN”””ūH¶Ž* /³Ž@`»D»B»>¶*/³@ j¶Ž³Ž@. t€» ¶Ž* Restore coordinate orientation³@.~€€»¶*\³@ˆµ1» ¶* \³Ž@*’µ?ą€»¶Ž* > Third circle³Ž@*œ„»H¶Ž* /³Ž@¦»D»B»>¶*/³@ °¶Ž³Ž@& ŗ…»¶Ž* Label Origin is centekNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŌÆNNNNNNNNNNNNNNNNNNNNNN”””ūr³@H&ĵŽ?tzįG®{ėµŽ?tzįG®{µ?tzįG®{°’°x¶Ž* Make bolded labels³@H Ī€čµ(Ž?žfffffg»³@$ ؊»¶Ž* Visible in Surprise³Ž@B$ ā» µBŽKœžµBŽ)------< These Pens are all wrong! >------¤³Ž@$B 숻¶Ž* Visible in additive³Ž@.$ ö» µBŽKœžµBŽNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žēžNNNNNNNNNNNNNNNNNNNNNN”””ūAdditive Color Circles¤³@&. ‰»¶Ž* Visible in subtractive³@2&  » µBŽKœžµBŽSubtractive Color Circles¤³Ž@2“Ž’°>³Ž@ ¶Ž³Ž@N (¶ŽC****************** Set up the Control Structure *******************³@N2€‰°Ž’ ³Ž@ <µBŽ ½xaNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž²ĶNNNNNNNNNNNNNNNNNNNNNN”””ū½’½³Ž@F“Ž’ ę³Ž@P€µŽAdditive½½’½³@"Z‚µŽ Subtractive½½’½³Ž@"d„µŽSurprise½½’½³@n‰µŽQuit½½’½³@ x¶Ž³ŽĄ ‚–³Ž@ Œ¶Ž³Ž@H –¶Ž<*************** ON KEY destinations ************************³Ž£NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žüNNNNNNNNNNNNNNNNNNNNNN”””ū@ H ¶Ž³ŽĄ Ŗ¶Ž³Ž@“€Ķ»M³@ ¾ŗ³Ž@ ȶŽ³ŽĄ Ҷ޳Ž@܀Ķ»M³@ ęŗ³Ž@ š¶Ž³ŽĄ ś¶Ž³Ž@€Ķ»M³@ ŗ³Ž@ ¶Ž³ŽĄ "ŗ³Ž@ ,¶Ž³ŽĄ 6½³Ž@ @¶Ž³Ž@ J½³Ž€€€o§NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž‘ĀNNNNNNNNNNNNNNNNNNNNNN”””ū ČĒNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ¢óNNNNNNNNNNNNNNNNNNNNNN”””ū’’’’6@ĀĀ’’lP’’l`š|lšV0ĀÅś@ V@ ’’’Ų;퀒’’Č;퀒’’Ąū€’’’øū@ ū0ŚÄJ"@!p’ūš€’’’°ū.@ ’ū8@ ’’’õū@0ŗÄJFl’ūLvce Knob_sbvce Old_develFNSwapExitONNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ÷ NNNNNNNNNNNNNNNNNNNNNN”””ūIChangeLevelHere Knob_srvce Old_levelExitFNPround@2¶Ž& "BAR_KNOB" Interactive graphics demo³Ž@ 2¶Ž³Ž@  €³@ €³@4 Ąٵ"#,Bœžµ1Ž’£µ!ŽK¤¶- Clear the screen³@ ¶sNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž đNNNNNNNNNNNNNNNNNNNNNN”””ū4(»"³@ 2»³@ <»³@ F€µ1ސµ!ėµ1Žx»³@Pµ1“€»³Ž@Zµ1“µH@Y »³@dµ1ܵH@Y »³@nµ1܀»³Ž@xµ1“€»³Ž@ ‚¶Ž³Ž@ Œˆ»³Ž@ –€‹Š°’šš³Ž@  µ1³»³Ž@ Ŗ» µ2ŽK,"-"œž¤³@““Ž’š¶³Ž@ ŠĆNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ]NNNNNNNNNNNNNNNNNNNNNN”””ū¾€³@ ȵ1Ȋ뻳@ Ņ…»³Ž@ Ü» µ2ŽDDD.Dœž¤³@ Ż‚»³Ž@ ޵1ܵ!P»³@&ß» µ2ŽKœžµ2Ž - High Normal¤³Ž@&ąµ1ܵ!<»³@$į» µ2ŽKœžµ2Ž - Low Normal¤³@$ęµ?„zįG®{»+’½³ŽĄ š–³Ž@ ś¶Ž³ŽĄ ¶Ž³Ž@ Ą³†©NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž n7NNNNNNNNNNNNNNNNNNNNNN”””ū@  ³@ "€ó·¾³Ž@  ,ė»³@ 6æ°Ž’ą°³Ž@ @ō·h³Ž@ JŒµŽ?¹™™™™™š½$³@  T –³Ž@ ^¹³@ hµ?ə™™™™šź³Ž@ rµ1µ»³Ž@ |µ1Ū»³Ž@ †“Ž’ą0³Ž@øŽŗ³Ž@  š»³Ž@ ¤°Ž’в³Ž@ ®‹õ·³Ž@ øŁŹNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž;dNNNNNNNNNNNNNNNNNNNNNN”””ūµA øµ?¹™™™™™š½$³@  Ā –³Ž@ ̹³@ Öµ1µ»³Ž@ ąµ1Ū»³Ž@" źŠļµ(Ž?ąóü…ņü÷·гŽ@ " ō€»³Ž@ žµ1µ»³Ž@  »³Ž@ ¹³@ µ?ə™™™™šč³Ž@ &“Ž’Š޳Ž@0¹³Ą : ¶Ž ³Ž@ D…»³Ž@ Nµ1Ȋ뻳@ Xė»³@ ½ŽNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žUNNNNNNNNNNNNNNNNNNNNNN”””ūb» µ2ŽDDD.Dœž Ó Õ‚ėÕ²¤³@ l»³Ž@ vµ1Ȋ뻳@ €» µ2ŽDDD.Dœž ÓՂėÕ²¤³@ Šŗ³Ž@ ”½³Ž@ ž¶Ž³Ž@īĮĮ’’’6@’’–ĄvŹnĄ0l’ū €’’’üDJ ’’’ųū Fä@!’’’’Fä@!’’’’0FNProundXY9rNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž/[NNNNNNNNNNNNNNNNNNNNNN”””ū³Ž@ ų€ń·Ø€ŗ³@ ææ čźææŗ³Ž@  ½³Ž ģ3NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žjNNNNNNNNNNNNNNNNNNNNNN”””ū’’’’ 2@ĀĀ’’ h’’` <hų H h 20¶Åś€’’’ØEś!’’’€8€’’’x;퀒’’pū!’’’H!’’’ V0pÄJ"@ Eś€!’’žų.0Īh€’’žšEśŲ0 nÄJF h’ūL0x@ Eś€0>Š@ Eś”0yNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žI9NNNNNNNNNNNNNNNNNNNNNN”””ū®ž@ EśØ0v²@ Eś¼0 &Ā@ EśČ0ęŠ@ ÅśŲedHere@ Knob_sbvce Old_develBarBarIChangeLevelHere Knob_srvce Old_levelBar_leftExitFNPround Bar_rightBar_oneBar_two BČNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žzNNNNNNNNNNNNNNNNNNNNNN”””ūar_threeBar_fiveBar_fourDummyNew_barLast_bar@2 ¶Ž' "BAR_KNOB2" Interactive graphics demo³@ 2¶Ž³Ž@( ¼£Ž£ ޣޤ³@ ((€³@ 2Ī€»{»y³@ < ³@4 FĄŁ'öNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žćŸNNNNNNNNNNNNNNNNNNNNNN”””ūµ"#,Bœžµ1Ž’£µ!ŽK¤¶- Clear the screen³@ 4P»"³@ Z»³@ d»³@ n€µ1ސµ!ėµ1Žx»³@x…°Ž’ą¼³Ž@ ‚ǵ!Fģµ!ŽꐳŽ@ ŒĒǵ!(萳Ž@ –Ē€»³@  ǵHŽ@Y »³@ ŖǵHŽ@Y »³@ “Ē€»³@ ¾Ē€»³@  ŚBNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŠ®NNNNNNNNNNNNNNNNNNNNNN”””ūȶŽ ³Ž@ ҈»³Ž@ ܃»³Ž@ 怋а’šb³Ž@ šǁ껳@ ś» µ2ŽK,"-"œž¤³@ “Ž’š(³Ž@ ǵ!ŽčŠė»³Ž@  …»³Ž@ "„»³Ž@ ,» µ2ŽDDD.DœžǤ³@6“Ž’ąj³Ž@@€µŽBar One½½’ ½³Ž@JµŽBar Two½½’½ÖNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž…żNNNNNNNNNNNNNNNNNNNNNN”””ū³Ž@ T‚µŽ Bar Three½½’½³Ž@ ^ƒµŽBar Four½½’½³@h„µŽBar Five½½’½³@r…‰°Ž’Š’³Ž@ |µ2Ž ½½’½³Ž@†“Ž’Šh³Ž@  •³Ž@ šµ?„zįG®{»+’½³ŽĄ ¤–³Ž@ ®¶Ž³ŽĄ ø ¶Ž ³Ž@ ³@ Ģ•³Ž@ ŌŻNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž¶ĢNNNNNNNNNNNNNNNNNNNNNN”””ūÖŗ³Ž@ ą¶Ž³ŽĄ ź¶Ž ³Ž@ ō‚³@ ž•³Ž@ ŗ³Ž@ ¶Ž³ŽĄ ¶Ž³Ž@ &ƒ³@ 0•³Ž@ :ŗ³Ž@ D¶Ž³ŽĄ N¶Ž³Ž@ X„³@ b•³Ž@ lŗ³Ž@ v¶Ž³ŽĄ €¶Ž³Ž@ Š…³@ ”•³Ž@ žŗ³Ž@ ضŽ³ŽĄ ²¶Ž ³ŽģˆNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž¦ņNNNNNNNNNNNNNNNNNNNNNN”””ū@¼ ǵ!Žė»³Ž@ ʁ뻳@ Š»Dµ!Ž(ˆ»=³Ž@Śǵ!Žė»³Ž@ 䁻³Ž@ ī»Dµ!Ž(ˆ»=³Ž@ ų ³@ ŗ³ŽĄ  ¶Ž³Ž@ Ą³@   Ēǐ³@*€ó·b³Ž@  4ė»³@ >æ°Ž’ĄT³Ž@ Hǁō·³Ž@ RŒµŽ?¹™™™™™š½$³@ ±yNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž •ĆNNNNNNNNNNNNNNNNNNNNNN”””ū \ –³Ž@ f¹³@ pĒǵ?ə™™™™šź³Ž@ zǁčĒ»³@ „ǁźĒ»³@ ޓޒĄʳŽ@˜øŽ n³Ž@  ¢»³Ž@ ¬°Ž’° f³Ž@ ¶Ē‹õ·¾³Ž@ ĄµA øµ?¹™™™™™š½$³@  Ź –³Ž@ Ō¹³@ ŽǁčĒ»³@ čǁźĒ»³@& ņNJļµ(Ž?ą9NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ĄNNNNNNNNNNNNNNNNNNNNNN”””ūóüĒ…ņü÷· :³Ž@ & ü€»³Ž@ ǁčĒ»³@  »³Ž@ ¹³@ $Ēǵ?ə™™™™šč³Ž@ .“Ž’°‚³Ž@8¹³Ą B ¶Ž ³Ž@ L…»³Ž@ Vǵ!ŽčŠė»³Ž@ `ė»³@" j» µBŽDDD.Dœž Ó ĒՂėÕ²¤³@ "t»³Ž@ ~ǵ!ŽčŠė»³Ž@"ˆ!fNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ó”NNNNNNNNNNNNNNNNNNNNNN”””ū» µBŽDDD.Dœž ÓĒՂėÕ²¤³@ "’ŗ³Ž@ œ¶Ž³ŽĄ ¦ŗ³Ž@ °½³Ž@ ŗ¶Ž³Ž((((@ÄĮĮ’’’6@’’–ĄvŹnĄ0 h’ū €’’’üDJ ’’’ųū Fä@!’’’’Fä@!’’’’0FNProundXY…NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž j6NNNNNNNNNNNNNNNNNNNNNN”””ū³Ž@ Ī€ń·Ø€ŗ³@ Ųææ čźææŗ³Ž@ ā½³Ž ²ĘNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž YNNNNNNNNNNNNNNNNNNNNNN”””ū’’’’eś@ĀĀ’’%ĄĄ’’0%n %xHb%n@ Eś,0%*Åś@ Åś"€’’’č;ķ@ Eś,A ’’’HA ’’’ VP ’’’’ÄJ"0„’ūāA ’’žų.P ’’’’h@ ’’žšEśŲP ’’’’ÄJF@ ’ūLP ’’’’xš’ūģP ’’’’Š B ųP ’’~’NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž TNNNNNNNNNNNNNNNNNNNNNN”””ū’’ž®’ūP ’’’’² BP ’’’’ĀĀ’ū€P ’’’’Š B2. B<` BF” BP  č’ūØ @dū>"@n p!@xF!@‚ P @Œ’Z’ūb @ ūj @Ŗ’v @“ū‚ @¾Dr2’ūž @ŅūØ @Ü’¶F’ūČōNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž?eNNNNNNNNNNNNNNNNNNNNNN”””ū @šūĄ!@ś(Ģ!@0Ō"’’ü 8Ü&ī’ūā@ 1ūī0$Ņ’ūų0’ū@ 4ū0"Ä’ū@ ’’’Źū&0#ˆ’ū6@ 8ūF0Ą’ūP7.’ūZ@ ;ūd0’ūp@ ’’’Ćū|0x’ūˆ@ ?ū”0J’ū @ Aū¬0’ūø@ Cū0`’ū¼@ Eö³NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žnßNNNNNNNNNNNNNNNNNNNNNN”””ūūÄ0Ņ’ūĢ0ģ’ūŌ@ HūŽ@ ’ū耒’ü˜ūō@ Kūś0’ū€’’üū0’ū €’’üˆū.0ō’ū:€’’ü€ūF€’’üxūL@ SūR0Ģ’ū^@ Uūj0!"’ūx’’üdD†\v’ū”€’’ü\ū AŚ’ūŖQ†’ū¶?Ģ’ūĀ€’’üTūŹ%Ą’ūŅŅNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž]īNNNNNNNNNNNNNNNNNNNNNN”””ū’’ü@Fā8X’ūģ@ aūņIMake_hard_copyDot$CurveStringsSwitch$CurvesTopOvalMs NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž½NNNNNNNNNNNNNNNNNNNNNN”””ūain_com Switchtype Switch_type$ Draw_rocker Last_switch$ Switch_oval$Switch_pattern$PointsCursor_xCursor_yDeltaxBreaks Up_break_1 Up_break_2 Down_break_1 Down_break_2Switches Max_switchesSwitches Oval_pointsOval_xOval_yArray F'/NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž;ŒNNNNNNNNNNNNNNNNNNNNNN”””ūill_arrays Soft_copy Define_keys Change_dotNumber_switchesBad_plot Hard_copy Change_type Knob_turned Dec_cursor Inc_cursorBottom Idle_loopQśNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž¢NNNNNNNNNNNNNNNNNNNNNN”””ūCount Cursor_key Switch_number Update_cursor Last_switch Make_cursorXnextYnext Patch_next Update_switch Next_switch$ Slide_frontA_points Draw_rocker Draw_slideAdd_dotNumberFNSwitch_clear$P?«NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž‘*NNNNNNNNNNNNNNNNNNNNNN”””ūlotter$Do_it@P ¶ŽD********************************************************************³Ž@ P¶Ž³Ž@ ¶Ž Program: "SWITCHES"³@$ (¶Ž Author: Larry Rowland³Ž@"$2¶Ž Date: 24 June 1982³@ (~NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žÄyNNNNNNNNNNNNNNNNNNNNNN”””ū"<¶Ž³Ž@J F¶Ž> This program allows you to edit the settings of a dip-switch³Ž@JJP¶Ž? package and produces plotter output of the pattern for drafts³@ JZ¶Ž and final documents³@ d¶Ž³Ž@ n¶Ž³Ž@P x¶ŽD**************** GLOBAL VARIABLELNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž÷HNNNNNNNNNNNNNNNNNNNNNN”””ūS **********************************³Ž@ P‚¶Ž³Ž@L Œ¶Ž@ Switch_pattern$: pattern of switches - "1" is up, "0" is down³Ž@HL–¶Ž< Curve: Array containing points for switch curve³Ž@:H ¶Ž. Max_switches: maximum number of switches³ŽøÕNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žēvNNNNNNNNNNNNNNNNNNNNNN”””ū@::Ŗ¶Ž/ Switches: currrent number of switches³@0:“¶Ž% Deltax: width of switches³@H0¾¶Ž= Cursor_x, Cursor_y: X,Y location of cursor for each switch³@DHȶŽ8 Dot$: "UP" or "DOWN", alignment of the dot³Ž@FDҶŽ:öNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ŌGNNNNNNNNNNNNNNNNNNNNNN”””ū Points: number of points in the curve array³Ž@:FܶŽ. Switch_Number: The switch being worked on³Ž@ :ę¶Ž³Ž@P š¶ŽD****************** SUBROUTINES *************************************³Ž@ Pś¶Ž³Ž@@ ¶Ž5 Knob_turned: IncrementŅmNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž NNNNNNNNNNNNNNNNNNNNNN”””ūs or decrements Switch_number³@6@¶Ž* Called by ON KNOB statement³Ž@ 6¶Ž³Ž@: "¶Ž/ Top : changes switch to top pressed in³@*:,¶Ž Called by ON KEY³@ *6¶Ž³Ž@B @¶Ž6 Bottom: changes switch to the b[NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ²%NNNNNNNNNNNNNNNNNNNNNN”””ūottom pressed in³Ž@*BJ¶Ž called by ON KEY³@ *T¶Ž³Ž@L ^¶Ž@ Update_switch: Updates the drawing for the new switch position³Ž@4Lh¶Ž) Called by Top and Bottom³@ 4r¶Ž³Ž@D |¶Ž8 Dot_up: : Puts dot in the u%5NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž +²NNNNNNNNNNNNNNNNNNNNNN”””ūpper right hand corner³Ž@,D†¶Ž! Called by ON KEY³@ ,¶Ž³Ž@B š¶Ž7 Dot_down: Puts dot in the lower left hand corner³@,B¤¶Ž! called by ON KEY³@ ,®¶Ž³Ž@< ø¶Ž1 Number_switches: Changes the number of swi‹NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ƒNNNNNNNNNNNNNNNNNNNNNN”””ūtches³@.<¶Ž# called by ON KEY³@ .̶޳Ž@* Ö¶Ž Hard_copy: Plots drawing³Ž@,*ą¶Ž! called by ON KEY³@ ,ź¶Ž³Ž@, ō¶Ž Soft_copy: Redraws the CRT³Ž@,,ž¶Ž! called by ON KEY³@ ,ōNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žMŠNNNNNNNNNNNNNNNNNNNNNN”””ū¶Ž³Ž@4 ¶Ž) Do_it: Draws the entire drawing³@@4¶Ž4 called from Hard_copy and Soft_copy³Ž@ @&¶Ž³Ž@* 0¶Ž Draw_it: Draws a switch³@<*:¶Ž1 called from Do_it, Update_switch³@ <D¶Ž³Ž@F N¶Žs‡NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž~įNNNNNNNNNNNNNNNNNNNNNN”””ū; Cursor_arrays: Initializes the arrays for cursor location³@,FX¶Ž! called from main³@ ,b¶Ž³Ž@< l¶Ž1 FNSwitch_clear: Clears Switch_pattern$ to "0"'s³@@<v¶Ž4 called from main at various places³Ž@ @€¶Ž³Ž@Rt»NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žYļNNNNNNNNNNNNNNNNNNNNNN”””ū жŽF**********************************************************************³Ž@ R”»)³@ ž¼ ³Ž@ ؛µ!Ž æ¤¶ CLEAR THE CRT³@ ²¶Ž³ŽĄ ¼¶Ž³Ž@Ƽ’’’’@Ž ¤³@м’’’’@Ž ¤³@&ڼ’’’’@ŽP£@Ž£@Ž £@ޤ³@0&ä¼’’’’£€u¢NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žjŽNNNNNNNNNNNNNNNNNNNNNN”””ū=€£ Ž€£!Ž€£"¤³Ž@0ī¼’’’’#$£%£&£'¤³@ų¼’’’’()£*¤³@ ¼’’’’+,£-€=£.Ž€=¤³@  ¶Ž³Ž@ ¼/€€#¤³@ µ2ŽROCKER³@*)µ!ސ³@ 4*ˆ³@ >"µ(Ž?īfffffg³@H,µ!Ž<³@Rµ2ŽFILL³@ \¶Ž³Ž@ f0ѲĶNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž?NNNNNNNNNNNNNNNNNNNNNN”””ū³Ž@ p¶Ž³Ž@ z2•³Ž@ „¶Ž³ŽĄ4 Ž3¶Ž& Set up the SoftKey initiated branches³Ž@ 4˜ˆ½³Ž@ ¢‰µŽDot ū½½’5½³@$¬„*æµ Switchesū½½’7½³Ž@$$¶ˆµŽ SHIFT to Plot½½’9½³Ž@&$Ąµ!µ" SHIFT to Plot½½’½³Ž@&ʃµŽType: kCNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ¼NNNNNNNNNNNNNNNNNNNNNN”””ūū½½’<½³@ Զ޳Ž@ ޵(?Ć333333»+’>½³Ž@耵Ž<-½½’@½³@ņ…µŽ<-½½’@½³@$ü‚µŽ ->½½’B½³Ž@$$‡µŽ ->½½’B½³Ž@ $µŽ Press Top½½’D½³Ž@" †µŽ Press Bottom½½’F½³@ "$¶Ž³ŽĄ .GAŒNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž•+NNNNNNNNNNNNNNNNNNNNNN”””ūG–¶Ž$ Loop here³Ž@ 8½³Ž@ B¶Ž³ŽĄ L<¶Ž³Ž@VµBŽROCKERń·f³Ž@ `µBŽSLIDE³Ž@jøŽ‚³Ž@ tµBŽROCKER³@~¹³@ˆƒµŽType: ū½½’<½³@ ’2•³Ž@ œŗ³Ž@ ¦¶Ž³ŽĄ °9¶Ž³Ž@$ŗ‘µBŽYOU MUST SHIFT TO PLOT¤³@ œNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž¦NNNNNNNNNNNNNNNNNNNNNN”””ū$Ľ$³@ Īŗ³Ž@ Ų¶Ž³ŽĄ āB¶Ž³Ž@ ģJ³@ öL•³Ž@ ŗ³Ž@  ¶Ž³ŽĄ @¶Ž³Ž@ Jė³Ž@ (L•³Ž@ 2ŗ³ŽĄ <>¶Ž³Ž@ F¶Ž³Ž@B P¶Ž6 The Knob has been turned - read the value, determine³Ž@4BZ¶Ž( the direction and de܎NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žóINNNNNNNNNNNNNNNNNNNNNN”””ūtermine new switch³Ž@ 4dJĄ³Ą nL¶Ž³Ž@xJ€ó·6MMč³@‚M*ņ·HM*³@ Œ¶Ž³Ž@ –J€ņ·hMMź³@ Mó·zM³@ Ŗ‘M¤³@ “¶Ž³ŽĄ ¾N¶Ž³Ž@ ȶŽ Erase the old cursor³@ ŅO ĒO!Ē»³@ ܀»³Ž@ ę» µBŽKœžµBޤ³ŽyĀNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žĄxNNNNNNNNNNNNNNNNNNNNNN”””ūĄ"šP¶Ž Draw the new cursor³@"śM ĒM!Ē»³@» µBŽKœžµBޤ³Ž@ OM³@ ŗ³Ž@ "¶Ž³ŽĄ ,D¶Ž ³Ž@*6¶Ž Press in the top of the switch³@ *@¶Ž³Ž@> J¶Ž2 Only update the switch if it needs to be changed.³Ž@>TMžµ0ńŽ·-"NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŠFNNNNNNNNNNNNNNNNNNNNNN”””ū¶³Ž@ ^µBŽDOWN³@, hM*ö·жŽ+ Need to modify the next³Ž@,+r¶Ž+ switch?³Ž@6|¶Ž* Calculate the location of the next switch³Ž@6 †Qµ8?÷\(õĀ\Mģ萳Ž@ Rėµ(Ž?Š£× =p¤Mģź³Ž@  šė»³@ ¤µBŽROCKERń·P³Ž@.®¶Ž" ERASE THE LINE šĖNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ćwNNNNNNNNNNNNNNNNNNNNNN”””ūIN THE NEXT SWITCH³Ž@ . øQR»³@ ĀQR'껳@ ĢQR&껳@ ÖQRµ8@ ™™™™™šź»³Ž@ ą¹³@ źµBŽSLIDEńŽ·lT•³Ž@  ō¶Ž ³Ž@ žV•¶Ž! DRAW SWITCH³Ž@  ¶Ž ³Ž@. ¶Ž# REDRAW THE LINE IN THE NEXT SWITCH³@ . »³Ž@ &µBŽROCKERń·:³Ž@ ™yNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ¶$NNNNNNNNNNNNNNNNNNNNNN”””ū 0QR»³@ :QR%껳@ DQR$껳@ NQRµ8@ ™™™™™šź»³Ž@ X¹³@ bµBŽSLIDEńŽ·VT•³Ž@  l¶Ž ³Ž@( vøŽœ¶ŽTHERE IS NO NEXT SWITCH³@ ( €V•³Ž@ й³@ ”Mžµ1³Ž@ž¹³@ Øŗ³Ž@ ²¶Ž³ŽĄ> ¼T¶Ž0 FIX THE NEXT SWITCH FOR THEŗˆNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž …NNNNNNNNNNNNNNNNNNNNNN”””ū NEW SWITCH POSITION³Ž@>ĘMčžµ0ńŽ·D³Ž@ ŠWµBŽDOWN³@ŚøŽ\³Ž@ äWµBŽUP³@ī¹³@ųXŃWÕÕ/ĶÕYÕ²³@ »³@  Y°Ž’š¼³Ž@ Q/ČčR‚/Ččƒ/Č»&³Ž@ “Ž’š޳Ž@ *ŗ³Ž@ 4¶Ž ³ŽĄ >F¶Ž ³Ž@HMžµ1ńŽ· kNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ‚NNNNNNNNNNNNNNNNNNNNNN”””ū! ³Ž@ RµBŽUP³@ \M*ö· ą³Ž@ fQµ8?÷\(õĀ\Mģ萳Ž@ pRėµ(Ž?Š£× =p¤Mģź³Ž@  zė»³@ „µBŽROCKERń·ā³Ž@*޶Ž ERASE LINE IN THE NEXT SWITCH³Ž@ * ˜QR»³@ ¢QR%껳@ ¬QR$껳@ ¶QRµ8@ ™™™™™šź»³Ž@ Ą¹³@ ʵBŽSLIDEńYNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž /³NNNNNNNNNNNNNNNNNNNNNN”””ūŽ·žT•³Ž@ Զ޳Ž@ ŽV•³Ž@ č¶Ž³Ž@( ņ¶Ž DRAW LINE IN THE NEXT SWITCH³@ ( ü»³Ž@ µBŽROCKERń· ¶³Ž@  QR»³@ QR'껳@ $QR&껳@ .QRµ8@ ™™™™™šź»³Ž@ 8¹³@ BµBŽSLIDEńŽ· ŅT•³Ž@ LøŽ ņ³Ž@  VV•³Ž@ `¹³@@ŗNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žząNNNNNNNNNNNNNNNNNNNNNN”””ū jMžµ0³Ž@ t¹³@  ~ŗ³Ž@  ˆ¶Ž³ŽĄ  ’V¶Ž³Ž@ œMń·!b³Ž@ ¦µBŽFIRST³Ž@ °øŽ!¼³Ž@ ŗMźžµ0ńŽ·!œ³Ž@ ĵBŽDOWN³@ ĪøŽ!“³Ž@ ŲµBŽUP³@ ā¹³@ ģ¹³@  öė»³@  µBŽROCKERń·!čZŃMÕ²³Ž@  µBŽQ£NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žIŃNNNNNNNNNNNNNNNNNNNNNN”””ūSLIDEńŽ·"[ŃMÕ²³Ž@  ¶Ž³Ž@  µBŽUPń·"J³Ž@ (µBŽDOWN³@ 2øŽ"b³Ž@ <µBŽUP³@ F¹³@  P»³Ž@  ZµBŽROCKERń·"ŽZŃMÕ²³Ž@  dµBŽSLIDEńŽ·"®[ŃMÕ²³Ž@  nŗ³Ž@  x¶Ž³ŽĄ  ‚5¶Ž³Ž@  Œė»³@  –\ŃÕ²³Ž@  µą=NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žõNNNNNNNNNNNNNNNNNNNNNN”””ūBŽDOWNń·#"³Ž@ ŖµBŽUP³@ “øŽ#<³Ž@ ¾µBŽDOWN³@ ȹ³@  ҁ»³Ž@  Ü\ŃÕ²³Ž@ ꉵŽDot ū½½’5½³@  šŗ³Ž@  ś¶Ž³ŽĄ  7¶Ž³Ž@. ½ µBHow many switches? [2 to 16]½]¤³Ž@. ])ņ·$³Ž@& "‘]ŸµBŽ is too many switc'NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žĘ2NNNNNNNNNNNNNNNNNNNNNN”””ūhes!¤³@ & ,½$³@ 67•³Ž@  @¹³@ J]‚ó·$h³Ž@& T‘]ŸµBŽ is too few switches!¤³Ž@ & ^½$³@ h7•³Ž@  r¹³@  |*]³@  †^Ó*Õ²³Ž@$ „*æµ Switchesū½½’7½³Ž@ $ š2•³Ž@  ¤ŗ³Ž@  ®¶Ž³Ž@  ø¶Ž³ŽĄ  Ā2¶Ž³Ž@ Ģ_µBŽSOFT³@<=NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž“aNNNNNNNNNNNNNNNNNNNNNN”””ū Ö`Ń_Õ²³Ž@  ąM³@  źP•³Ž@  ōŗ³Ž@  õ¶Ž³ŽĄ  ö¶Ž³Ž@  ÷»³@  ł:Ѳ³Ž@  ś2•³Ž@  ūŗ³Ž@  ž¶Ž³Ž@  ½³Ž P Š=€€č=č=H#@ ĮĮ.P j’’¶ rB,n@NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž PNNNNNNNNNNNNNNNNNNNNNN”””ū0%Ą’ū €’’’üū ’’’ž€’’’–ū @b’’¶FNSwitch_clear$SwitchesTemp$I³Ž@ ¼@P¤³@ &µBŽ0³Ž@ 0ź°Ž’š ³Ž@ :µB0ū³@ D“Ž’šź³Ž@  Nŗ³@  X½³Ž@  b¶Ž³ŽP@ lŃNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž9ĒNNNNNNNNNNNNNNNNNNNNNN”””ūĀĀ t`’’H `Ā„ lĀ' X &ī’ū0T’ū j’ū B2$ B<4 BF: BPB’ūP @dūX"@n’`!@xūn!@‚Drx @Œ’f®’ū‚ @ ūŠ @Ŗ’– @“ū¢ @¾Dr°Č’ū¾ @ŅūČ @‡ŗNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž öNNNNNNNNNNNNNNNNNNNNNN”””ūÜ’ÖÜ’ūą @šūę!@ś’ņ!@ūś%Ą’ū@ ’’’ęū0 Ģ’ū @ ū.0 ģ’ū8@ ūB0(’ūN€’’’ČūZ€’’’Ąū\€’’’øū^€’’’°ū`€’’’Øūj€’’’ ūpn$Dot$S Fill_arraysCom_fill_arraysStringsSwitch_pattern$Dot$Switch$ S9øNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž_„NNNNNNNNNNNNNNNNNNNNNN”””ūwitch_oval$CurvesPointsCurveDeltaxCursor_xCursor_yBreaks Up_break_1 Up_break_2 Down_break_1 Down_break_2Switches Max_switchesSwitchesOval Oval_pointsOval_xOval_yFNSwitch_clear$ Cursor_arrays Make_ovalČ]NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žl”NNNNNNNNNNNNNNNNNNNNNN”””ū Curve_dataIAB Oval_stepAngleR³Ž@  v¶Ž³ŽĄ  €¶Ž³Ž@& м’’’’@Ž£@Ž£@Ž£@ޤ³@& ”¼’’’’£ £ £ £ ¤³Ž@ ž¼’’’’ £££¤³@ ؼ’’’’£¤³@ ²¼’’’’££¤³Ž@$ ¼¶Ž Clear the switcŪNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž|ŖNNNNNNNNNNNNNNNNNNNNNN”””ūhes to 0³Ž@$ ĘÓÕ²³Ž@ еBŽUP³@  ڶ޳Ž@@  䶎5 Fill locations of cursors into Cursor_x and Cursor_y³@ @ Ž@  ų¶Ž³Ž@ •³Ž@  ¶Ž³Ž@&  ¶Ž Read the points into Curve³@ & ½³Ž@ * ¤³@ 4 °Ž’š³Ž@ >   Č£ ‚¬-NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž O›NNNNNNNNNNNNNNNNNNNNNN”””ū Ȥ³@ H“Ž ’šų³Ž@  R¶Ž³ŽĄ$  \¶Ž Data for Curve follows³@$$ f¼  61 ¶Ž THIS IS POINTS³@$ p¼  0 ,0³Ž@ z¼ .04,-0.05³Ž@ „¼  .07,-.1³Ž@ ޼  .1,-.15³Ž@ ˜¼  .12,-.2³Ž@ ¢¼ .14,-.25³@ ¬¼ .15,-.29³@  ¶¶Žė`NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ČNNNNNNNNNNNNNNNNNNNNNN”””ū³Ž@ Ą¼ .16,-.32³@ ʼ .17,-.37³@ Ō¼ .18,-.41³@ ޼ .19,-.46³@ č¼  .2,-.53³Ž@ ņ¼  .2,-.57³Ž@  ü¶Ž³Ž@ ¼  .2,-.6³@ ¼ .19,-.75³@ ¼ .18,-.84³Ž@ $¼ .17,-.92³Ž@ .¼  .16,-1³Ž@ 8¼ .15,-1.0“KNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž )łNNNNNNNNNNNNNNNNNNNNNN”””ū7³@ B¼ .14,-1.13³@ L¶Ž³Ž@ V¼ .13,-1.2³Ž@ `¼ .12,-1.27³@ j¼ .11,-1.34³@ t¼ .1,-1.42³Ž@ ~¼ .1,-1.5³@ ˆ¼ .11,-1.59³@ ’¶Ž³Ž@ œ¼ .12,-1.64³@ ¦¼ .13,-1.68³@ °¼ .15,-1.74³@ ŗ¼ C¢NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž °nNNNNNNNNNNNNNNNNNNNNNN”””ū.17,-1.79³@ ļ .2,-1.86³Ž@ μ .22,-1.9³Ž@ ض޳Ž@ ā¼ .25,-1.96³@ ģ¼ .27,-2.0³Ž@ ö¼ .31,-2.07³@ ¼ .34,-2.12³@  ¼ .38,-2.18³@ ¼ .42,-2.24³@ ¶Ž³Ž@ (¼ .47,-2.32³@ 2¼ .51,-2.39³@­¼NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ƒ_NNNNNNNNNNNNNNNNNNNNNN”””ū <¼ .54,-2.46³@ F¼ .56,-2.51³@ P¼ .57,-2.55³@ Z¼ .58,-2.59³@ d¶Ž³Ž@ n¼ .59,-2.65³@ x¼ .59,-2.69³@ ‚¼ .58,-2.76³@ Œ¼ .57,-2.8³Ž@ –¼ .55,-2.85³@  ¼ .53,-2.9³Ž@ Ŗ¶Ž³Ž@ “¼ .5d3NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žÖ NNNNNNNNNNNNNNNNNNNNNN”””ū,-2.95³Ž@ ¾¼ .47,-2.99³@ ȼ .44,-3.03³@ Ҽ .4,-3.08³Ž@ ܼ .37,-3.11³@ ę¼ .32,-3.17³@ š¶Ž³Ž@ ś¼ .28,-3.21³@ ¼ .25,-3.24³@ ¼ .15,-3.33³@ ¼ .07,-3.4³Ž@ "¼ 0,-3.45³@ ,¶Ž³Ž@D 6żiNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žå=NNNNNNNNNNNNNNNNNNNNNN”””ū¶Ž9 Set values for the broken line in back of an "UP" switch³@D @µ!Ž‚ Č됳@ J…‚ Č됳@ T¶Ž³Ž@D ^¶Ž8 Set values for a broken line in back of a "DOWN" switch³Ž@D hµ!Ž7‚ Č됳@ rµ!Ž#‚ Č됳@ |׳@ †¶Ž³ŽĄ ¶Ž³Ž@ š!µŽ?ÉūBNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žĀ3NNNNNNNNNNNNNNNNNNNNNN”””ū™™™™™š³@ ¤"µŽ?ə™™™™š³@ ®#µ1Žh퐳@ ø °Ž’ą ¶³Ž@  Ā$ #쐳@2 Ģ%!‚ī"‚īģü!‚ī$æ‚īüģü"‚ī$µ!źæ‚īüģüčüķæ³Ž@2 Ö Ē%$æ쐳@ ą Ē%$æ쐳@ ź“Ž ’ą F³Ž@  ōŗ³Ž@ ž¶Ž³ŽĄ ¶Ž³Ž@  °Ž’Š N³Ž@&  ǵ(Ž?ū333333µ8?÷˜čNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žńNNNNNNNNNNNNNNNNNNNNNN”””ū\(õĀ\ źüģ萳@(& & ǵŽ?Ł™™™™™šėµ(Ž?Š£× =p¤ źüģź³@( 0“Ž ’Š ī³Ž@  :ŗ³Ž@ D±³@ N¶Ž³Ž@XĀĀĢ`0’’TĄŌ~ĢČø 4b’ū ‚’’’ųū €’’’ō’ €’’’šū0`’ū,v’ū: @šū@!@ś’L!@R„NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž¤QNNNNNNNNNNNNNNNNNNNNNN”””ūūT€’’’Ųū\€’’’Šūb_draw_ovalDgval OvalgpointsO Draw_ovalMode$ Oval_center_x Oval_center_y Com_draw_ovalOval Oval_pointsOval_xOval_yHalfI³Ž@ b¶Ž ³ŽĄ l¶Ž³Ž@ v¼’’’’££¤³Ž@. €µBŽrjNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž—`NNNNNNNNNNNNNNNNNNNNNN”””ūFILLń·N¶Ž DRAW A FILLED OVAL³@ . Š ‚퐳@ ”ĒčĒ軳@ ž ‚‚ķ°Ž’š(³Ž@ Ø Ēč Ē軳@ ² źĒč źĒ軳@ ¼“Ž ’šź³Ž@& ĘøŽø¶Ž DON'T FILL THE OVAL³Ž@& ЁĒčĒ軳@ Ś ‚°Ž’ąœ³Ž@ ä Ēč Ē軳@ ī“ŽŚ~NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž÷NNNNNNNNNNNNNNNNNNNNNN”””ū ’ąv³Ž@ ųĒčĒ軳@ ¹³@ ±³@ ¶Ž³Ž@ ĀĀ*’’“nD(n 7.’ū’’’ģ @ ū0š’ū8X’ū$ Hard_copyPlotter$Kill_itDo_it³Ž@ *µBŽHARD³!NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž=ĘNNNNNNNNNNNNNNNNNNNNNN”””ū@ 4ˆµŽABORT½½‚’½³@ >ŃÕ²³ŽĄH¶Ž³Ž@  I»³@ R€»³Ž@ f±³@ p¶Ž³Ž@zĀĀt ’’h\¼Ŗh ø&T 8X’ū ‚’’’ųū0t’ūŠ’ū @ū" @"’*ž’ū2 B>²’ūR B2ōÆNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žh•NNNNNNNNNNNNNNNNNNNNNN”””ūZ B<L BFj BPrŲ’ū€ @dūˆ'@n’'@xūž'@‚DrØ @Œ’–ö’ū² @ ūŗ @Ŗ’Ę @“ūŅ @¾Drą’ūī @Ņūų @Ü’$’ū @šū'@ś’"'@ū*<’ū2 B >€’’’čūL?Ģ’ū\€ŗ8NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž[¤NNNNNNNNNNNNNNNNNNNNNN”””ū’’’ąūdAŚ’ūrQ†’ū~Do_itPlotter$ Com_do_itAdd_dotXprimeYprime Draw_rocker Last_switch$Dot$StringsSwitch_pattern$Switch$ Switch_oval$CurvesPointsCurveDeltaxCursor_xCursor_yBreaks Up_break_1 Up_break_2 Down_break_1’„NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žKšNNNNNNNNNNNNNNNNNNNNNN”””ū Down_break_2Switches Max_switchesSwitchesOval Oval_pointsOval_xOval_y Switchtype Switch_type$Character_sizeAdd_dot Switch_number Draw_rocker Draw_slide³Ž@ „¶Ž³ŽĄ ޶޳Ž@ ˜¼’’’’£¤³@ ¢C"NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž x«NNNNNNNNNNNNNNNNNNNNNN”””ū¼’’’’@ޤ³@& ¬¼’’’’ @Ž£ @Ž£ @Ž£ @ޤ³@& ¶¼’’’’ ££££¤³Ž@ Ą¼’’’’£££¤³@ ʼ’’’’£¤³@ Ō¼’’’’££¤³Ž@ ޼’’’’ @ޤ³@ č¶Ž³Ž@ 黳@ ņ»"³@ üµBŽHARDń·¤³Ž@ µ1Įµ2HPGL»#³@ åˆNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž -ųNNNNNNNNNNNNNNNNNNNNNN”””ūøŽijŽ@ ƒµŽINTERNAL»#³@ $¹³@ .µ(Ž?ū333333ģėˆė»³@ 8!…ˆģ퐳@ B!ˆņ·!ˆ³@  L!»³Ž@ V»³@0 `µ8Ž@µH?÷p£× =q‚źüģ萶( DRAW BOX³@&0 jµ(Ž?čQė…øRėµ(Ž?Š£× =p¤‚źüģź³@ & t€€»³@" ~µ?ć333333ėµŽ?Ó333333뻳Ž@"ķ"NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ÉNNNNNNNNNNNNNNNNNNNNNN”””ū" ˆµ?ć333333ėµ(Ž@333333뻳Ž@" ’€…뻳Ž@  œ€€»³@ ¦»³@ °…껳@ ŗ€…뻳Ž@" ĵ?ć333333ėµ(Ž@333333뻳Ž@$" εŽ?ć333333źµ(@333333껳Ž@$ ؅껳@ ā¶Ž³Ž@ ģ"Ń Õ²³Ž@ ö¶Ž³Ž@ µBŽFIRST³Ž@  #°Ž’š°ŠNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ‡^NNNNNNNNNNNNNNNNNNNNNN”””ū>³Ž@   #žµ1ńŽ·Ą µŽUP³@"  #žµ0ńŽ·ā µŽDOWN³@ " ( µBŽROCKERń·$Ń#Õ²³Ž@ 2 µBŽSLIDEńŽ·"%Ń#Õ²³Ž@ < ³@ F“Ž#’š ³Ž@  P»³@ Z€»³Ž@ d±³@ n¶Ž³Ž@xĀĀ ’’$®tDŽNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž “oNNNNNNNNNNNNNNNNNNNNNN”””ūŖ ś ?Ģ’ū ‚’’’ųū,’ū @ū @"’€’’’ųū&€’’’šū44b’ūBieeYprime Oval_cender_xAdd_dotDot$Add_dotXprimeYprime Oval_center_x Oval_center_y Draw_oval³Ž@ ĀĢNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žį³Ž@$ ø  Čč ‚ ČėOGNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žOsNNNNNNNNNNNNNNNNNNNNNN”””ūčµ8Ž@ ™™™™™šź»³Ž@$ Ā“Ž ’š³Ž@ ̹³@ ֶ޳Ž@ ą¶Ž BEEP 4000,.1³@ źµBŽDOWNń·ą³Ž@ ō  Čč ‚ Č軳@ ž źė°Ž’ąŲ³Ž@   Čč ‚ Č軳@ “Ž ’ą°³Ž@ ¹³@ &¶Ž³Ž@ 0¶Ž BEEP 5000,.1³@ :µBŽFIRSTńŽ·mĆNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž|BNNNNNNNNNNNNNNNNNNNNNN”””ūP³Ž@  D»³@ Nµ8@ ™™™™™šź»³Ž@ XøŽ³Ž@ bµBŽUPń·“³Ž@  l»³@ v껳@ €ź»³@ е8@ ™™™™™šź»³Ž@ ”øŽü³Ž@  ž»³@ Øź»³@ ²ź»³@ ¼µ8@ ™™™™™šź»³Ž@ ƹ³@ й³@ ڶ޳Ž@ 䶎 ”+NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž)NNNNNNNNNNNNNNNNNNNNNN”””ū BEEP 4000,.1³@ īµBŽUPń·“³Ž@$ ų Č聂 Čėčµ8Ž@ ™™™™™šź»³Ž@$  ‚ °Ž’Ь³Ž@$   Čč ‚ Čėčµ8Ž@ ™™™™™šź»³Ž@$ “Ž ’Šv³Ž@  ¹³@ *¶Ž³Ž@ 4µBŽDOWNń·6³Ž@ >  Čč ‚ Č軳@ H źė°Ž’Ą.³Ž@ R  Čč ‚ Č軋ŒNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž NNNNNNNNNNNNNNNNNNNNNN”””ū³@ \“Ž ’Ą³Ž@ f¹³@  p»³@ z¶Ž BEEP 3000,.1³@ „µBŽUPń·ˆ³Ž@  Ž"•³Ž@ ˜øŽš³Ž@  ¢$•³Ž@ ¬¹³@ ¶¶Ž³Ž@* ĄµBŽUPń· 4¶Žtop of the switch³@* Ź%µ(?äĢĢĢĢĢĶ萳Ž@ Ō&µ(@333333ꐳŽ@ Ž'Ń Õ%Õ&Õ²³Ž@& čøŽ zH½NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž NNNNNNNNNNNNNNNNNNNNNN”””ū¶Ž  bottom of the switch³@& ņ%µ?ć333333萳Ž@ ü&µ?ęfffffgꐳŽ@ 'Ń Õ%Õ&Õ²³Ž@ ¹³@ ¶Ž³Ž@ $׳@ .¶Ž³ŽĄ 8"¶Ž³Ž@* Bµ(Ž?åp£× =qčµ(?ć× =p£×ź»¶Ž# A³Ž@$* Lµ8Ž?÷333333čµ(?čQė…øR껳Ž@*$ VµŽ?陙™™™ščµ(?čź»¶ŽœNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž 9/NNNNNNNNNNNNNNNNNNNNNN”””ū# B³Ž@$* `µ8Ž?ö\(õĀčµ(?ė…øQė…ź»³Ž@*$ jµ(Ž?åøQė…čµ(?ė333334ź»¶Ž# C³Ž@$* tµ(Ž?ųčµ(?šź»³Ž@*$ ~µ(Ž?åĀ\(õĆčµ(?ļ\(õĀ]ź»¶Ž# D³Ž@$* ˆµŽ?ģĢĢĢĢĢĶčµ8?šQė…øR껳Ž@*$ ’µ8Ž?ńøQė…čµ8?šĢĢĢĢĢĶź»¶Ž# E³Ž@$* œµ8Ž?÷…øQ¬’NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž l|NNNNNNNNNNNNNNNNNNNNNN”””ūė…čµ8?ńė…øQģź»³Ž@*$ ¦µ(Ž?ąõĀ\(öčµ(?žfffffgź»¶Ž# F³Ž@$* °µ(Ž?ščµ8?’× =p£×껳Ž@*$ ŗµ(Ž?Ķp£× =qčµ8@õĀ\(öź»¶Ž# G³Ž@$* ĵ(Ž?ļ =p£× čµ8@껳Ž@*$ ε(Ž?Ščµ(@™™™™™šź»¶Ž# H³Ž@$* Ųµ(Ž?ļ\(õĀ]čµ8@£× =p¤ź»³Ž@ ”ĶNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž _MNNNNNNNNNNNNNNNNNNNNNN”””ū$ āŗ³ŽĄ ģ$¶Ž³Ž@* öµ(Ž?Ščµ8?ō(õĀ\)ź»¶Ž$ A³Ž@** µŽ?陙™™™ščµ8?õĀ\(õĆź»¶Ž$ B³Ž@**  µ(Ž?Ē =p£× čµ8?õ™™™™™šź»¶Ž$ C³Ž@** µ(Ž?īøQė…¹čµ8?÷× =p£×ź»¶Ž$ D³Ž@** µ(Ž?ä(õĀ\)čµ8?ų£× =p¤ź»¶Ž$ E³Ž@** (µ(Ž?ļ =p£× čµ(?ł(NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ĘŚNNNNNNNNNNNNNNNNNNNNNN”””ū™™™™™šź»¶Ž$ F³Ž@** 2µ(Ž?ć× =p£×čµ8@ė…øQģź»¶Ž$ G³Ž@** <µ(Ž?č£× =p¤čµ8@(õĀ\)ź»¶Ž$ H³Ž@** Fµ8Ž?šĢĢĢĢĢĶčµ8@\(õĀź»¶Ž$ I³Ž@** Pµ8Ž?õøQė…čµ8@õĀ\(öź»¶Ž$ J³Ž@** Zµ(Ž?ęøQė…¹čµ(@ĢĢĢĢĢĶź»¶Ž$ K³Ž@** dµ(Ž?īzįG®čµ8@øQėT½NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž õėNNNNNNNNNNNNNNNNNNNNNN”””ū…ź»¶Ž$ L³Ž@** nµ8Ž?ńĀ\(õĆčµ8@\(õĀ\ź»¶Ž$ M³Ž@** xµ8Ž?ö=p£× >čµ8@Ā\(õĆź»¶Ž$ N³Ž@** ‚µŽ?ģĢĢĢĢĢĶčµ8@× =p£×ź»¶Ž$ O³Ž@** Œµ8Ž?õp£× =qčµ8@zįG®{ź»¶Ž$ P³Ž@** –µ(Ž?ččµ8@zįG®{ź»¶Ž$ Q³Ž@**  µ8Ž?š£× =p¤čµ8@įG®zįź»AźNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž øNNNNNNNNNNNNNNNNNNNNNN”””ū¶Ž$ R³Ž@** Ŗµ8Ž?ņ\(õĀčµ8@ =p£× ź»¶Ž$ S³Ž@** “µ8Ž?÷× =p£×čµ8@…øQė…ź»¶Ž$ T³Ž@ * ¾ŗ³Ž@ ȶ޳Ž@ ұ³@ ܶ޳Ž@ęĀĀ H’’žÖž^ā"š#Ī Q†’ū €’’’üū 0ž’ū’ū* B6c:NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž“‰NNNNNNNNNNNNNNNNNNNNNN”””ū(’ūJ B2R B<D BFb BPjN’ūx @dū€'@n’ˆ'@xū–'@‚Dr  @Œ’Žl’ūŖ @ ū² @Ŗ’¾ @“ūŹ @¾DrŲ†’ūę @Ņūš @Ü’ž€’’’Ųū€’’’Šū "’’ü  VŠ’ū€’’üˆū’’ųĄ(€’’ųøÕNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž“‡NNNNNNNNNNNNNNNNNNNNNN”””ūū0\v’ū2Ncom_draw_sdide Drawgrocker L Draw_slide Switch_numberCom_draw_slide Draw_rocker Last_switch$Dot$StringsSwitch_pattern$Switch$ Switch_oval$CurvesPointsCurveDeltaxCursor_xCursor_yBreaks Up_break_1 Up_break_2 Down_ī¹NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž‡¶NNNNNNNNNNNNNNNNNNNNNN”””ūbreak_1 Down_break_2Switches Max_switchesSwitchesXYArray Slide_bodyR_pointsArrrayI Slide_front³ŽĄš¶Ž³Ž@ ś¼’’’’@ޤ³@& ¼’’’’@Ž£@Ž£@Ž£ @ޤ³@& ¼’’’’ £ £ ££¤³Ž@ ¼’’ČRNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŅåNNNNNNNNNNNNNNNNNNNNNN”””ū’’£££¤³@ "¼’’’’£¤³@  ,¶Ž ³Ž@ 6µ8?÷\(õĀ\źüģ萳@ @ėµ(Ž?Š£× =p¤źüģź³@  J¶Ž ³Ž@ T¼€€¤³@ ^ŃÕĶÕÕ²³@ hȂČ»³@ r°Ž’šZ³Ž@ |Čč‚ČčƒČ»&³Ž@ †“Ž’š,³Ž@  ¶Ž ³Ž@ šŃp¼NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žįŌNNNNNNNNNNNNNNNNNNNNNN”””ūÕÕĶÕÕ²³@ ¤ȂČ»³@ ®°Ž’ąγŽ@ øČč‚ČčƒČ»&³Ž@ “ޒ࠳Ž@̱³@  Ö¶Ž ³Ž@Č @ąĀĀģ`’’(ą¶pģŖ Ų VŠ’ū ‚’’’ųū "€’’’š’ €’’’ģū@ UyNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žxCNNNNNNNNNNNNNNNNNNNNNN”””ūū(0Ō’ū0@ ū80Ø’ūB€’’’čūLJbody_array Up_body Slide_bodySwitch$Points Body_arrayUp_body Down_bodyI³Ž@ źµBŽUPń·X³Ž@  ō½³Ž@ žøŽl³Ž@  ½³Ž@ ŒXNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žKrNNNNNNNNNNNNNNNNNNNNNN”””ū¹³@  ¶Ž ³Ž@ & ¤³@ 0°Ž’šĄ³Ž@ : Č£‚Č£ƒȤ³Ž@ D“Ž’š–³Ž@  N¶Ž ³Ž@ X׳Ą,b¶Ž POINTS FOR THE UP SWITCH BODY³Ž@&, l¼  17 ¶NUMBER OF POINTS³Ž@& v¼  0,0,1³Ž@ €¼ 1,-0.2,1³@ м 1,-.22,0³@ ”¼ é/NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž!NNNNNNNNNNNNNNNNNNNNNN”””ū 1,-2.32,1³Ž@ ž¼ 1,-3.6,1³@ ؼ 0,-3.4,0³@ ²¼ .8,-3.52,1³@ ¼¼ .8,-2.36,1³@ Ƽ 1.76,-1.88,1³@ м 1.76,-.68,1³Ž@ ڼ .92,-.2,0³Ž@ ä¼ 0.08,-0.08,1³@ ī¼ .84,-.52,1³@ ų¼ 1.76,-.68,0³Ž@ ¼ .84,-.52,«NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž-NNNNNNNNNNNNNNNNNNNNNN”””ū1³@  ¼ .84,-1.72,1³Ž@ ¼ 1.76,-1.88,0³@   ¶Ž ³ŽĄ& *¶ŽDATA FOR DOWN SWITCH BODY³@(& 4¼ 21 ¶NUMBER OF POINTS³Ž@( >¼  0,0, 1³@ H¼  1,-.2,1³Ž@ R¼ 1,-1.36,0³Ž@ \¼ .08,-.12,1³@ f¼ .8,-.28,1³Ž@ p¼ #ZNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž=.NNNNNNNNNNNNNNNNNNNNNN”””ū.8,-1.28,0³Ž@ z¼ .8,-.28,1³Ž@ „¼  1,-.2,0³Ž@ ޼ .8,-1.28,1³@ ˜¼ 1.76,-1.84,1³@ ¢¼ 1.76,-3.04,1³@ ¬¼ .93,-3.52,0³Ž@ ¶¼ .08,-3.32,1³Ž@ Ą¼ .84,-2.88,1³Ž@ ʼ 1.76,-3.04,0³@ Ō¼ .84,-2.88,1³Ž@ ޼ .±kNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž NNNNNNNNNNNNNNNNNNNNNN”””ū84,-1.68,1³Ž@ č¼ 1.76,-1.84,0³@ ņ¼ 0,-3.4,1³Ž@ ü¼ 1,-3.6,1³@ ¼ 1,-3.5,0³@  ¶Ž ³Ž@ ±³@ $¶Ž³Ž@.ĀĀ’’ö|€’’ų |ö „š | \v’ū ‚’’’ųū ‚’’’š’"€’’’čū* €’’’äDr@ ’’’ūū60ˆņNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž [LNNNNNNNNNNNNNNNNNNNNNN”””ū’ū@@ ūJ0d’ūV@ ūb0@’ūn@ ūz0L’ūˆ@ ū–0p’ū¤@ ū²0‚’ūĀ€’’’čūŅ Slide_frontSwitch$Points Last_switch$ Front_arrayFirst_up First_down Front_up_up€’’’ F L€’’’F V°Åś00x¼NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žĪĪNNNNNNNNNNNNNNNNNNNNNN”””ūr @ā0ŲŒ€’’’F – @2F œ @ @~NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŽšNNNNNNNNNNNNNNNNNNNNNN”””ū <0ŠÅśĢ(Åś@P ’’’’Ę ꀒ’žšJ€’’žčEś"ÅśT@ ÅśōöÅś^P ’’’’œ@ ’’žčūVP ’’’’¬@"’’żö2ŗ0t‚P ’’’’Ņ@ ’’žšEśŽ@ ’’ż¾Eśģ0!ž@ ÅśŖ@ >P ’’’’’ū¦0Ęō@ ’’žEś0@ ’’żž$@ ¶Åśœ@ ’’żü‚NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ķĮNNNNNNNNNNNNNNNNNNNNNN”””ū2A †"A *€@ ’’ż¶EśĘ@ ’’žųG ’’ś~@@ ’’żäF @ ’’śvEś@ Åśv@ „t€’’žąEśP ’’’’Ę HP ’’’’.@ Ę >@ ’’śfF X@ ’’żŹF fG ’’śb"r@ ’’ż¾F f@ ’’ż¶F @ ’’ż®F ~@ ’’ż¦F @"’’ż’\Š@ ’’śZEśœP ’’’’Ę ¤ AÜ“P ’’’’Ę Ą@ €'NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ø’NNNNNNNNNNNNNNNNNNNNNN”””ūĘ Ģ@ “’Ų@ ’’’lģ@ •ś@ –@ —@ ˜@ ™.@ ’’’f>@ ›H@ œX@ h@ žv@ Ÿ|@ ’’’`ˆ@ ””@ ¢¤@ £Ŗ@ ¤°@ „¶@ ’’’ZĘ@ §Ō@!’’’’N@ ©ą@ Ŗę@ «ģbNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ‹£NNNNNNNNNNNNNNNNNNNNNN”””ū@ ’’’Tōu`X1Keyx X WhatghappenedDdoopYNeg_xIPYinSetupBoundsX What_happenedBoxYIPin$SmidgeFilledKey Fast_digitize Label_stuffKey1Key2Key3Key4Box_openPointsKP}NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž 4NNNNNNNNNNNNNNNNNNNNNN”””ūey6Dummy Rubber_lineCrossCircleMin_xMax_xMin_yMax_y Max_clip_yDig_modeSingleLabelxWoops$ Softkey_in$Sw_folSw_normÉÄNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž !NNNNNNNNNNNNNNNNNNNNNN”””ūTrueFalseDig_indNBooleans Label_screen Stat_word Continuous Fill_stringsDigitized_pointKey15 Which_keyGuardRadiusLeftLabelsBlockSquWīNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žtVNNNNNNNNNNNNNNNNNNNNNN”””ūareLabel$Xin Rubber_boxKey16 AuxillaryLabel_yAnchor_x Tablet_modesPoint_overflowToo_many_points Tablet_msgs Dig7JNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žGgNNNNNNNNNNNNNNNNNNNNNN”””ū_ind_on Dig_ind_off Max_pointsAnchor_y Echo_global Echo_drawn Make_echo Echo_type Kill_echo Echo_global1=]NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž`iNNNNNNNNNNNNNNNNNNNNNN”””ūAuxillary_pointBrush Brush_mode)ZNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žSXNNNNNNNNNNNNNNNNNNNNNN”””ūį"NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž NNNNNNNNNNNNNNNNNNNNNN”””ū@, ½¶. Force ON INTR space onto stack³@ ,¼ ³Ž@& ¼’’’’2Ž€£ODŽ€ £I£J¤³@&(¼’’’’DQ!£S ¤³@2¼’’’’W/@Ž£-@Ž-¤³@<¼’’’’Y[£^£_¤³Ž@FæQNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž5:NNNNNNNNNNNNNNNNNNNNNN”””ū¼’’’’dg££F¤³@P¼’’’’Z)!£. £1 £3 £d ¤³@Z¼’’’’¤³Ž@ d¶Ž³ŽĄ n¶Ž ³Ž@4xµ1ĀŁµ2ŽKœžµ2ŽIN;¤¶Ž/ Initialize Tablet³Ž@@4‚µ1ĀŁµ2ŽKœžµ2ŽIP0,0,12032,9544¤¶/ Set up new P1, P2³Ž@ @Œ¶Ž³Ž@ –»³@  »"³@ ŖƒµŽINTEB{NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž¬­NNNNNNNNNNNNNNNNNNNNNN”””ūRNAL»#³@ “»³@ ¾»³@ ȵ1µ2HPGL»3³@<ҵ1ĀŁµ2ŽKœžµ2ŽIM,Ÿ„µ1ހ褶Ž/ SRQ Map for Tablet³@:<ÜĄٵB#,Bœžµ1Ž’£µ!ŽK¤¶/ Clear the Alpha Screen³@ :ę¶Ž³Ž@ 𠀐³@ ś8Œ³@ ½€8½ƒ½½¤³@ ¶Ž³Ž@ Q³@ "S€³ØßNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŸœNNNNNNNNNNNNNNNNNNNNNN”””ū@ ,3€¶/ Digitizing Modes³@ 6.³@ @1‚³@ Jƒ³@ T'„³@ ^¶Ž³Ž@$ h€¶/ Scale and Clip Limits³Ž@$r µHŽ@rĢĢĢĢĢ͐³@ |!€³@ †"µHŽ@mÓ33334³@µ1ŽŚ³@ š¶Ž³Ž@ ¤F‚¶/ Echo Stuff³@ ®³@ ø€³@ Āc³@ Ģ[SƒnNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŹĻNNNNNNNNNNNNNNNNNNNNNN”””ū³@ ֶ޳Ž@0 ąµŽ?Ó333333¶/ For closing Single Mode³Ž@ 0ź¶Ž³Ž@ ō !"»¶1 Set It Up³Ž@ ž<•³Ž@ A•³Ž@ •³Ž@ ‡½’½³Ž@ &‡‚ƳŽ@ 0¶Ž³Ž@ :» ¶/ Main Tracking Loop³@ DP$»4³Ž@ Nг@( XaŃPÕ$ÕcÕ²¶Ž/ Several E®NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žłžNNNNNNNNNNNNNNNNNNNNNN”””ūcho Types³@( bϳ@l»ŽĄ³Ž@ v¶Ž³ŽĄ$ /€¶Ž/ What Caused Interrupt³Ž@$е1ĀŁžµ2OS¤³@”µ1ĀŪžB¤³Ž@ž[·|deѲ³@0ØB‚Ą·B¶Ž  This is a digitized point³Ž@0 ²C·ų³Ž@  ¼•³Ž@4 ĘøŽ:¶Ž # NOT Continuous - single point msBNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žéĄNNNNNNNNNNNNNNNNNNNNNN”””ūode³@4 ŠddŽ· ³Ž@  Śdp•³@ äøŽ2³Ž@  īE•³Ž@ ų¹³@ ¹³@ ¹³@B‡Ą·VG•³Ž@  ‡‚ƳŽ@ *ŗ³Ž@ 4¶Ž³ŽĄ& />E¶Ž/ Single Point Digitizing³Ž@&H 8ó·ž³Ž@  R č³@ \ Č ‚Č »2³@ f ƒČ 搳Ž@  p»³Ž@, z Ȭ±NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ŚńNNNNNNNNNNNNNNNNNNNNNN”””ū źČźæņ ‚Č ź‚Čźæņų·ijŽ@, „ źČ ź‚Č»³@ Ž źČ ź‚Č źƒČ»&³Ž@ ˜ Č ‚Č ƒČ»&³Ž@ ¢ Č ‚Č»0³@  ¬c³@ ¶^ Ȑ³Ž@ Ą_ ‚Ȑ³Ž@ ŹP Ȑ³Ž@ Ō$ ‚Ȑ³Ž@ ŽøŽš³Ž@  č ź³@ ņ ƒȀ³Ž@  üc³@ ¹³@֘NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ¢NNNNNNNNNNNNNNNNNNNNNN”””ūøŽ³Ž@  –³Ž@ $¹³@2.‘8 ꟵBŽ points left in the fill array.¤³Ž@ 28ŗ³Ž@ B¶Ž³ŽĄ$ /L¶Ž/ Continuous Digitizing³Ž@ $V»³Ž@ `6S³@ j» ³@ t 8󷳎@  ~ č³@ ˆ Č ‚Č »2³@ ’ ƒČ 搳Ž@ œ Č ‚Č ƒČ»&³Ž#±NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ¼“NNNNNNNNNNNNNNNNNNNNNN”””ū@ ¦ Č ‚Č»0³@ °øŽ&³Ž@  ŗ6Q³@ Ĺ³@Ī ƒȀń6ų»Žœ³Ž@ŲP Ȑ³Ž@ā$ ‚Ȑ³Ž@ ģ S³@ öµ1ĀŁžµ2 BP20,50,4¤³Ž@2‘8 ꟵBŽ points left in the fill array.¤³Ž@2 6·Ā–³Ž@ ŗ³Ž@ ¶Ž³ŽĄ /(G¶Ž/ Softkey SelecteFŲNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž %NNNNNNNNNNNNNNNNNNNNNN”””ūd³@2µ1ĀŁžµ2RS1¤³Ž@<µ1ĀŪž¤³Ž@F„ōµ!õųŽ·~³Ž@ Pµ1ĀŁž/¤³Ž@, Z¬Žlt³Ž@,døŽڳŽ@& n‘µBŽMenu Selection Undefined¤³@& xµ1ĀŁž-¤³Ž@ ‚µ?ą½#³Ž@  Œ‘„³Ž@ –¹³@  ŗ³Ž@ Ŗ¶Ž³ŽĄ /KNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž 5NNNNNNNNNNNNNNNNNNNNNN”””ū“¶Ž/ Switch Normal³Ž@ ¾`•³Ž@ ȵ1ĀŁžµ2CN;SN¤³Ž@Ņ ƒȀ³Ž@ Ü)3³@ ęc³@ šCQ³@ śd‚S³Ž@ =•³Ž@ »³@ ŗ³Ž@ "¶Ž³ŽĄ /,¶Ž/ Switch Follow³Ž@ 6`•³Ž@ @µ1ĀŁžµ2CN;SF¤³Ž@J ƒȀ³Ž@ T)1³@ ^c³@ ÷µ!°’š¢³Ž@  * >OǤ³@ 4“Ž>’š„³Ž@ >¶Ž³ŽĄ, HL¼  SN,SF,Sng,Box," "," "," "," "³Ž@,,R¼ ! " "," "," "," ":?NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žÜNNNNNNNNNNNNNNNNNNNNNN”””ū," "," ",Clr,Quit³@ ,\ŗ³Ž@ f¶Ž³ŽĄ -pA¶Ž- Menu Layout³Ž@zHµ(Ž@ffffff³@„Iµ8Ž@+fffffg³@ŽJ€HźI‚ķꐳ@˜µ1Žę³@ ¢…»³Ž@ ¬µ(@ĢĢĢĢĢĶ»³@ ¶>€³@ ĄM€ƒ°Ž’Šx³Ž@ ŹN„°Ž’ąf³Ž@  Ō>>č³@* Ž>2ĒJM„IģƒHģčµ8@%3333å¦NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žGNNNNNNNNNNNNNNNNNNNNNN”””ū33čüģčNIHčüģ萳Ž@* č>2Ē»³@ ņ» µBŽKœž>OǤ³@ ü>2ĒI‚ķźµHŽ@kÓ33334»³@ »DII»=³Ž@ “ŽN’ąγŽ@ “ŽM’Šŗ³Ž@  $ŗ³Ž@  .¶Ž³ŽĄ  8¶Ž³Ž@X B‘µBŽJToo many Points - I have to close the fill array! Fill to do more drawing.¤³[õNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žt¾NNNNNNNNNNNNNNNNNNNNNN”””ū@X Lµ1ĀŁžµ2OD¤³@ Vµ1ĀŪž£¤³Ž@ `µ1ĀŁžµ2SGŸ-¤³@  j•³Ž@  tŗ³Ž@  ~¶Ž³ŽĄ  ˆ=¶Ž³Ž@  ’»H³Ž@  œ9•³Ž@  ¦ŗ³Ž@  °¶Ž³ŽĄ  ŗ`¶Ž³Ž@  āė»H³@  Ī9•³Ž@  Ųŗ³Ž@  ā¶Ž³ŽĄ  ģ9¶Ž³Ž@ ö)» ā³Ž@ »Ž Ŗ3»šŌNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žķ)NNNNNNNNNNNNNNNNNNNNNN”””ū»Ž ³Ž@  >³@  »Ž Ŗ.»»Ž .³Ž@  >ƒ³@  (»Ž Ŗ1»»Ž T³Ž@  2>‚³@  <»Ž Ŗ»»Ž z³Ž@  F>„³@  P»Ž Ŗ'»»Ž  ³Ž@  Z>…³@  d»³@  n»³@  x>2ĒI‚ķźµ1ŽŪ»³@ ‚»DI‚»B»=³@  Œ»³@  –»³Ž@ óNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŽNNNNNNNNNNNNNNNNNNNNNN”””ū   ŗ³Ž@  Ŗ¶Ž³ŽĄ  “p¶Ž³Ž@ ¾»2³Ž@ Č·!h³Ž@  Ņ^³@ Ü_³@ ęcF³@ šS³@  śøŽ!°³Ž@  »³Ž@ ^_»³@ »D^ź_ź»=³Ž@  "Q³@ ,c³@  6¹³@  @ŗ³Ž@ J¶Ž ³Ž@  T½³Ž@ ^¶Ž ³Ž€Ą -4ÆNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž‹KNNNNNNNNNNNNNNNNNNNNNN”””ū Ę»Ą hĀ’’œōXBTģ "0;ć œ @J;ć @T( @^;Ļ0 @h>¶L @|;ćX @†bŹr @Œ;ć~ @–Š @ ;Ļ”āž AP;㨠AZ®ö“ AĀųNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žøzNNNNNNNNNNNNNNNNNNNNNN”””ūš;ć¼ A¤Ę A®;ĻĪ AøŚ AĀ;»ęō @š;ć @ś @;Ļ@ F  l2L Kill_echo Kill_echoLast_x Echo_localLast_y Last_anchor_x Last_anchor_y Echo_local2Last_penLast_echo_type Echo_global Echo_drawnAnchor_xAnchor_oNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žØDNNNNNNNNNNNNNNNNNNNNNN”””ūyBooleansTrueFalseModalsDrawmodeNormal Complement Current_pen Current_fill Echo_global1 Rubber_lineCross Rubber_box³Ž@R r¶Ž F**********************************************************************³Ž@RR |YłNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ›uNNNNNNNNNNNNNNNNNNNNNN”””ū¶Ž F* *³Ž@RR †¶Ž F* This routine gets rid of whatever echo is left over on the *³Ž@RR ¶Ž F* screen. *³Ž@RR š¶Ž F* Č)NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž Ī&NNNNNNNNNNNNNNNNNNNNNN”””ū *³Ž@RR ¤¶Ž F**********************************************************************³Ž@ R ®¶Ž ³Ž@ ø¼’’’’£££¤³@ ¼’’’’£ ¤³@ ̼’’’’ £ £ ¤³Ž@ Ö¼’’’’!£ ¤³@ ą @hLØZ @|;ćf @†p¼€ @Œ;㌠@–˜ @ ;Ļ¢Ō¬ AŗzNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž W±NNNNNNNNNNNNNNNNNNNNNN”””ūP;ć¶ AZ¼čĀ Aš;ćŹ A¤Ō A®;ĻÜ Aøč AĀ;»ō @š;ć @ś @;Ļ". @ ;ć6"B@ !F LegechoXYIecho_typeJecho_locaast_ Make_echo Make_echoXY Echo_type Echo_localLast_x×'NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žāNNNNNNNNNNNNNNNNNNNNNN”””ūLast_y Last_anchor_x Last_anchor_y Echo_local2Last_penLast_echo_type Echo_global Echo_drawnAnchor_xAnchor_yBooleansTrueFalseModalsDrawmodeNormal Complement Current_pen Current_fill Echo_global1 Rubber_lineCross Rubber_boxBounds½NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž1ÓNNNNNNNNNNNNNNNNNNNNNN”””ū Max_clip_y Kill_echo³Ž@R ”¶Ž F**********************************************************************³Ž@RR ž¶Ž F* *³Ž@RR ضŽ F* This ro6­NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŻNNNNNNNNNNNNNNNNNNNNNN”””ūutine makes the an echo of the current Echo_type at the *³Ž@RR ²¶Ž F* specified (X,Y) location. It also updates the variables for *³Ž@RR ¼¶Ž F* the Kill_Echo Subprogram. *³Ž@RR ʶŽ F* DŅNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž%ģNNNNNNNNNNNNNNNNNNNNNN”””ū *³Ž@RR жŽ F**********************************************************************³Ž@ R ڶŽ ³Ž@ ä¼’’’’£££ ¤³@ ī¼’’’’ £ ¤³@ ų¼’’’’ ££¤³Ž@ ¼’’’’!£ ¤³@ ¼’’’’!£ £—ĶNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žpæNNNNNNNNNNNNNNNNNNNNNN”””ū £ £ ¤³Ž@ ¼’’’’££¤³Ž@ ¼’’’’¤³Ž@  *¶Ž ³Ž@ 4·F Ѳ³Ž@ >ó·.³Ž@  H€»³Ž@ R» r³Ž@ \»Žü»»Ž¦³Ž@  f»³@ p»³@ z»Žü»»Žā³Ž@  „»³@ Ž»Dźź»=³Ž@ ˜»Žü³Ž@ ē|NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žCŽNNNNNNNNNNNNNNNNNNNNNN”””ū ¢»³@ ¬»0³@ ¶³@ Ą³@ ʐ³@ Ō¹³@  Ž»0³@ č ³@ ņ³@ ü ³@ »³Ž@ ±³ £VNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŚNNNNNNNNNNNNNNNNNNNNNN”””ūP10 ! ************************************************************************.20 Gray_map: SUB Gray_map(Surface(*),N,Crt)P30 !------------------------------------------------------------------------!P40 ! Copyright 1983, HewD1)n6510 IF RND<=Surface(Row,Col) THEN PLOT Col,Row520 NEXT Col530 NEXT Row 540 ELSE550 Recip_n_plus_1=1/NĘWNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žćNNNNNNNNNNNNNNNNNNNNNN”””ū560 FOR Row=1 TO Rowmax-1o570 FOR Col=1 TO Colmax-1,>580 Left_row_delta=Surface(Row+1,Col)-Surface(Row,Col)C590 Right_row_delta=Surface(Row+1,Col+1)-Surface(Row,Col+1)a600 FOR Subrow=0 TO N-1f(610 Suby=SubgłNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŗ1NNNNNNNNNNNNNNNNNNNNNN”””ūrow*Recip_n_plus_17620 Left=Surface(Row,Col)+Left_row_delta*Subye;630 Right=Surface(Row,Col+1)+Right_row_delta*Subyw!640 FOR Subcol=0 TO N-1o*650 Subx=Subcol*Recip_n_plus_1660 IF Color THEN 3670 H“NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž‰NNNNNNNNNNNNNNNNNNNNNN”””ū Pen=(Left+(Right-Left)*Subx)*14+1l680 PEN Penf0690 PLOT Col*N+Subcol,Row*N+Subrow700 ELSET710 IF RND<=Left+(Right-Left)*Subx THEN PLOT Col*N+Subcol,Row*N+Subrow720 END ł NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žÜSNNNNNNNNNNNNNNNNNNNNNN”””ūIF730 NEXT Subcol=740 NEXT Subrowo750 NEXT Col760 NEXT Row 770 END IF780 CALL Pause(1)b 790 SUBEND’’SET710 IF RND<=Left+(Right-Left)*Subx THEN PLOT Col*N+Subcol,Row*N+Subrow720 END ŌNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žļbNNNNNNNNNNNNNNNNNNNNNN”””ū’’’’@"@ĀĀ’’;6Ö’’Ø:Š:hĪŠ;: "’’ż"’’üP "’’ū"’’śŠ$"’’ś0""’’öš<*"’’š°H2"’’źpT8"’’ź`> ’’éŅlF"’’é‚nL"’’éBzX"’’é†d"’’č²’p"’’ę¢ž~"’’ęb¶†"’’åĀĀ’€’’åŗ;˚€’’XPNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žvõNNNNNNNNNNNNNNNNNNNNNN”””ūå²;˜€’’åŖ;Ėž0ŗ;ˤ0p;ĖØ0Ā;Ė®0ģ;˶0”;˼0Ī;ĖČ0;ĖŌ04;Ėą0~;Ė耒’å¢;Ėō€’’åš;Ėö@ Eś:0$;Ėž€’’å’;Ė€’’åŠ;Ė0&‚;Ė;6;Ė"@ %Eśč00P;Ė*€’’å‚;Ė206R08ØF@ *Eśų06“^ńžNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žEÄNNNNNNNNNNNNNNNNNNNNNN”””ū03ģ;Ėj€’’åz;Ėp03";Ėx@ ’’’Ń;Ė~€’’år;Ė„04†;ĖŒ05 ;Ė”05Ž;Ėœ€’’åj;ˤ0bÅśŖP ’’’’Åśø0NÅśČ"’’å*ŖŲl GroundDdreeTreColormapFlash1Flash2Flash3NormalGroundTreeTree2LeavesText$ House_front House_side HouseØcNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž—NNNNNNNNNNNNNNNNNNNNNN”””ū_roof House_shadowChimney Side_windowRandomIJFlashSkyMoonGroundHouse House_front House_side House_roofChimney Side_windowXYTree DirectionDistance LightningStrokeCloudsXcloud Move_cloudsFlash4 Good_nightܳNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž#¦NNNNNNNNNNNNNNNNNNNNNN”””ūFlashFlashedHereFlashesFlash1Flash2Flash3Cloud House_shadowChimney_shadowChimney_shadow@  ¼ ¶Ž, Arrays start at 1³Ž@ ¼€¤³@8¼€£ŽķNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž3˜NNNNNNNNNNNNNNNNNNNNNN”””ū€£Ž€£Ž€¤³@>8(¼€2€£Ž€d€£Ž€d€£Ž€€£ @Ž<¤³@8>2¼ €€£ Ž€€£ Ž€€£ Ž€€¤³@88<¼€€£8Ž€€£Ž€€£Ž€ €¤³@88FĄٵ"#,B,Kœžµ1Ž’£µ2ŽK¤¶Ž, Clear the s÷ÕNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ©NNNNNNNNNNNNNNNNNNNNNN”””ūcreen³@68P›µ"Ž'Copyright 1983, Hewlett-Packard Company¤³Ž@"6Z›µ"ŽAll Rights Reserved¤³Ž@ "dƒ½#³@8 nĄٵ"#,B,Kœžµ1Ž’£µ2ŽK¤¶Ž, Clear the screen³@,8x»"¶, Initialize graphics parameters³@:,‚ƒµŽINTERNAL»I¶, MUST be a color-mapped de’"NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž UśNNNNNNNNNNNNNNNNNNNNNN”””ūvice³Ž@*:Œ»¶, Turn on the graphics raster³Ž@**–€µ1Ž’€µ1Ž…»¶, 1 UDU = 1 pixel³Ž@**  Ķ£ͤ¶, Define color map values³Ž@,*Ŗ€Ķ»L¶, Define colors for picture³Ž@8,“¼  0,0,0 ¶ Pen 0: Black background³Ž@*8¾¼  .68,1,.18 “ØNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž fĖNNNNNNNNNNNNNNNNNNNNNN”””ū ¶ Pen 1: Sky³@,*ȼ  0,0,.7 ¶ Pen 2: Moon³Ž@<,Ҽ  .22,1,.1 ¶ Pen 3: House and tree shadow³@4<ܼ  0,1,.2 ¶ Pen 4: House's front³@.4ę¼  0,0,0 ¶ Pen 5: Window³Ž@R.š¼  .19,.4,.08 ¶2 Pen 6xNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ’\NNNNNNNNNNNNNNNNNNNNNN”””ū: Left side of tree trunk and chimney shadow³Ž@2Rś¼  .33,1,.17 ¶ Pen 7: Left leaves³@T2¼  .19,.4,.08 ¶4 Pen 8: Right side of tree trunk and unshadowed roof³Ž@4T¼  .33,1,.17 ¶ Pen 9: Right leaves³Ž@<4¼  .68,1,.18 ²bNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ĢmNNNNNNNNNNNNNNNNNNNNNN”””ū ¶ Pen 10: Left lightning flash³@><"¼  .68,1,.18 ¶ Pen 11: Middle lightning flash³@>>,¼  .68,1,.18 ¶ Pen 12: Right lightning flash³Ž@.>6¼  0,0,.05 ¶ Pen 13: Clouds³@2.@¼  0,1,.2 ¶ Pen 14: House side³’-NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž™>NNNNNNNNNNNNNNNNNNNNNN”””ū@.2J¼  .22,1,.1 ¶ Pen 15: Ground³@:.Tˆµ!°’ą 6¶Ž,! \ Define a subset of the color³@:: ^ƒ°Ž’š ¶Ž," \ map so execution time will be³Ž@6: hČȐ¶," > faster when setting the color³Ž@:6 r“Ž’š –¶Ž,$ / map back to norĄWNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŖNNNNNNNNNNNNNNNNNNNNNN”””ūmal when turning³Ž@0:|“Ž’ą \¶Ž, / off a lightning bolt.³Ž@T0†¶ŽI Modified color map for lightning flashes -------------------------------³@>T¼  .1,.68,.38 ¶ Pen 8: Lit tree trunk and roof³@2>š¼  .33,.61,.3 ¶ Pen 9: Lit le-™NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žNNNNNNNNNNNNNNNNNNNNNN”””ūaves³Ž@<2¤¼  .68,1,.18 ¶ Pen 10: Left lightning flash³@><®¼  .68,1,.18 ¶ Pen 11: Middle lightning flash³@>>ø¼  .68,1,.18 ¶ Pen 12: Right lightning flash³Ž@.>¼  0,0,.2 ¶ Pen 13: Clouds³@2.̼  0,1,.65  ęNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž¾0NNNNNNNNNNNNNNNNNNNNNN”””ū ¶ Pen 14: House side³@.2Ö¼  .22, 1,.35 ¶ Pen 15: Ground³@T.ą¶ŽI Second modified colormap for second flash of lightning -----------------³@TźĪĪ»z»y¶Ž, \³Ž@ōĪĪ»z»y¶Ž, \³@8žƒ°Ž’Šŗ¶Ž,! \ The only difference #īNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žėcNNNNNNNNNNNNNNNNNNNNNN”””ūbetween³@28 ƒńü¶Ž, \ the three lightning arrays³Ž@02 ŠČ¶Ž, / is which lightning pen is³@.0 µ! Ȑ¶, / defined to be white.³Ž@. &µ! Ȑ¶, /³@0“Ž’Šü¶Ž, /³ŽĄR :¶Ž D Draw the sky --------------------------------ćŻNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŲRNNNNNNNNNNNNNNNNNNNNNN”””ū----------------------³Ž@RD€€»¶, \³Ž@2N»H¶Ž,# > Fill the whole bloomin' screen³@ 2X»Dµ1Ž’µ1…»B»=¶Ž, /³ŽĄP b¶Ž C Draw the moon ----------------------------------------------------³@Plµ!2µ1,»¶, \³Ž@2v‚»H¶Ž," \ The crescNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žAÅNNNNNNNNNNNNNNNNNNNNNN”””ūcent moon is a white³Ž@:2€»Dµ!Ž»B»>¶, \ circle (actually a 60-gon)³Ž@2:Ё»H¶Ž,# / mostly covered up by another,³@02”µ!.µ1.»¶, / sky-colored, circle.³Ž@0ž»Dµ!Ž»B»>¶, /³ŽĄNضŽA Draw the ground ---------------------üHNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žrōNNNNNNNNNNNNNNNNNNNNNN”””ū---------------------------³@N²Ȁ¶Ž, \³Ž@¼‚Ȁ¶Ž, \³@Ę‚µ!1°’Ą¶Ž, \³Ž@> ЁȂźüµ!/ķµ1Ž’쐶Ž, \ The ground is a polygon³@:> Ś‚ȵ1Œæ‚ģ萶Ž, \ which includes the lower³Ž@6:䓎’ĄV¶Ž,! \ corners ofXĢNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž'§NNNNNNNNNNNNNNNNNNNNNN”””ū the CRT as its³@:6īµ!2ȵ1Ž’¶,# / first and last points. All³@6:ųµ!2‚Ȁ¶,# / the intermediate points are³@06€€»¶, / a constant plus a random³Ž@ 0 µ!»H¶, / number.³@ Ķ»D»B»E¶, /³@ »¶, /³ŽĄP*}NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž–NNNNNNNNNNNNNNNNNNNNNN”””ū¶ŽB -----------------------------------------------------------------³Ž@P4  Ķ£ Ķ£ Ķ£ ͤ³@> Ķ£8Ķ£ͤ³ŽĄ2H5¼% 100,100, 150,50, 50,0, 0,0, 0,50³Ą:2R¼- 50,50, 50,120, 100, 160, 150,120, 150,50³Ą2:\¼$ 150,50, 150,120, 200,15ˆ=NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žØNNNNNNNNNNNNNNNNNNNNNN”””ū0, 200,80³ŽĄ42f¼& 100,160, 150,190, 200,150, 150,120³ŽĄ>4p¼& 0,0,3 ¶Ž8 PEN 0³Ž@H>z¼= 4,0,13, 0,0,11, -9,0,-2, -9,15,-1, 6,15,-1, 6,-12,-1, 0,0,7³@JH„¼? 14,0,13, 0,0,11, 6,-12,-2, 12,-9,-1, 12,18,-1, NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž 7™NNNNNNNNNNNNNNNNNNNNNN”””ū6,15,-1, 0,0,7³@JJ޼? 0,0,13, 0,0,6, 6,15,-2, 12,18,-1, -3,18,-1,-9,15,-1, 0,0,7³Ą0J˜7¼" 0,0, 15,-12, -15,-27, -30,-15³ŽĄ*0¢¼ 0,0, 6,3.6, 6,13.6, 0,10³Ž@>*¬ƒ»H¶Ž!/ \ Though pens 3 and 8 are initially the same³@@>¶ Ķ»D»Bˆ]NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž bŹNNNNNNNNNNNNNNNNNNNNNN”””ū»E¶!+ \ color, the pixels drawn by them have a³@4@Ą»¶!' > different color value. Thus, when³@:4!ʶŽ!. / lightning strikes and the ground (pen 15)³Ž@::!Ō¶Ž!/ / chenges color, the shadow (pen 3) doesn't.³@:Ž€»¶Ž, \³Ž@0舻H¶Ž, \ Ff¶Ž3 Draw the chimney ---------------------------------³@>†»H¶Ž, \³Ž@6µ1µ1™»¶, \ The chimney's shadow on the³Ž@86$8Ķ»D»B»G¶," dLNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ČlNNNNNNNNNNNNNNNNNNNNNN”””ū/ roof is the same color as the³Ž@(8.»¶, / left side of the tree.³@8(8µ1‚µ1–»¶+# \ All three faces of the chimney³@68BĶ»D»G¶Ž+# > are contained in the array, as³@26L»¶+% / are PEN and AREA PEN specifiers.³@>2V¶Ž3 -----------›oNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ū]NNNNNNNNNNNNNNNNNNNNNN”””ū---------------------------------------³@0>`„»H¶Ž,! \ The front of the house covers³@80j Ķ»D»B»C»E¶Ž, > up the extended brown area³Ž@*8t»¶, / of the chimney's shadow.³Ž@2*~µ!»H¶)! \ This side of the house will³@@2ˆ Ķ»D»B»C»E”ēNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž®NNNNNNNNNNNNNNNNNNNNNN”””ū¶Ž)& / light up when lightning strikes.³Ž@@’µ!Fµ!P»¶, \³Ž@œ…»H¶Ž, \³@.¦„»¶Ž, \ The window is compsed of³Ž@4.°ė‚°Ž’ N¶Ž, \ four filled and edged³@<4 ŗė‚°Ž’°6¶Ž," / rectangles all touching at a³Ž@6< Ä»DŠģ$NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž?NNNNNNNNNNNNNNNNNNNNNN”””ūµ!Ž ģ»B»C»=¶Ž, / common corner.³Ž@6 Γޒ°č¶Ž, /³@Ų“Ž’ ¬¶Ž, /³Ž@※¶Ž) \³Ž@싵!Ž2»¶) \³@,ö»Dµ!޵!(»=¶) > Draw the door³Ž@,µ1hµ!C»¶) /³@ »DŠ»>¶) /³Ž@>¶Ž3 Draw the side windows ---½éNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žĢ…NNNNNNNNNNNNNNNNNNNNNN”””ū-------------------------³@>µ!»¶, Red edges³Ž@ (€»H¶Ž, Black interiors³Ž@" 2µ1Žµ1£†°Ž’€6¶Ž, \³Ž@8" <µ?ć333333ģµ!Žźµ?ć333333ģ…źŠ°’¶Ž, \³@08 F»¶,! \ Draw the left window on the³@20 PĶ»D»B»C»G¶Ž, / siķNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž’“NNNNNNNNNNNNNNNNNNNNNN”””ūde of the house.³Ž@2 Z“Ž’¤¶Ž, /³@d“Ž’€l¶Ž, /³Ž@"nµ1Ž·µ1½†°Ž’`$¶Ž, \³Ž@8" xµ?ć333333ģµ!Žźµ?ć333333ģ…źŠ°’p ¶Ž, \³@28 ‚»¶," \ Draw the right window on the³Ž@22 ŒĶ»D»B»C»G¶Ž, / side of the house.³ŽÕNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŖēNNNNNNNNNNNNNNNNNNNNNN”””ū@2 –“Ž’p¶Ž, /³@ “Ž’`X¶Ž, /³ŽĄP Ŗ ¶Ž C Draw the tree (the whole trunk) ----------------------------------³@P“µ!2°’P P¶Ž, \³Ž@ ¾ȅæģčü됶, \³@6 Č‚Č‚ģ‚ź¶Ž, \ The tree is a tall, skinny³Ž@<6 ҵ1eźȅæģĶNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž™ÖNNNNNNNNNNNNNNNNNNNNNN”””ū萶Ž,! / rectangle with rough sides.³@< ܵ1eź‚Č‚ģ‚ź¶, /³@꓎’P¶Ž, /³Ž@*šĪĪ»z»y¶Ž, Make a spare copy...³@8*śµ1µ!»¶,# \ Fill the whole tree trunk with³@28†»H¶Ž,# > the unchanging color of brown.³@2Ķ»D»B»9ŻNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žANNNNNNNNNNNNNNNNNNNNNN”””ūG¶, /³Ž@>¶Ž3 Draw the right side of the trunk -----------------³@>"µ!2°’@!ҶŽ, \³Ž@: ,Ȃæģ萶,$ \ Just redefine the right side of³Ž@*: 6‚Č‚ģ‚ź¶Ž, / the tree trunk.³Ž@*@“Ž’@!V¶Ž, /³Ž@0Jˆ»H¶Ž, \ ...then fill itYĪNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž3pNNNNNNNNNNNNNNNNNNNNNN”””ū in with the³Ž@20TĶ»D»B»G¶, / brown that will be lit.³Ž@>2^¶Ž3 Draw the tree's shadow ---------------------------³@4>hĪĪ»z»y¶Ž, Get the original outline back³Ž@"4r»¶, Uppen zie picken it³Ž@8"|‹°Ž’0#¬¶Ž, \ Make the Y values éNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žf#NNNNNNNNNNNNNNNNNNNNNN”””ū negative,³Ž@48 †‚Č‚Č됶Ž, \ and translate the X values³@D4 ČČ‚ȵ(?ū333333ģ萶,! \ by an amount proportional to³@4Dš“Ž’0#¶Ž, / the corresponding Y value,³@04¤ƒ»H¶Ž,! / i.e., "shear" it left. Then³@80®Ķ»D»B»G¶," / NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žUNNNNNNNNNNNNNNNNNNNNNN”””ū fill with house shadow color.³Ž@>8ø¶Ž3 Draw leaves---------------------------------------³@(>Ā ͤ¶Ž, A hexegon is sufficient³Ž@:(̼ . -10,0, -8,-2, 8,-2, 10,0, 8,2, -8,2³Ž@&:Ö»)¶, Make it easy on yourself³@0&ąµ1°’ &‚¶Ž, F†9NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žE,NNNNNNNNNNNNNNNNNNNNNN”””ūour hundred "leaves"³Ž@80 ź!æµ1Žh쐶Ž," Which direction from tree center?³Ž@<8 ō"ææµ!ŽF쐶Ž,$ Skewed distance for uniform density³Ž@< žµ1"!æģčµ1“"!æģ軳@$ !µ1އó!µ1;ņųü"µ!2ņ÷Ž·&³Ž@($ ‰»H¶Ž, These leaves will be lit³@*( øŽ&F 9NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž vNNNNNNNNNNNNNNNNNNNNNN”””ū¶Ž, not on upper right edge³Ž@,* &‡»H¶Ž, These leaves will not be lit³@, 0¹³@" :Ķ»D»B»G¶, Make a leaf³Ž@"D“Ž’ % ¶Ž, etc.³ĄLN#¶Ž> Draw the lightning ------------------------------------------³Ž@TLX¶ŽH The main purpose for the s…£NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž #NNNNNNNNNNNNNNNNNNNNNNN”””ūtory line is to cover up the fact that there³Ž@PTb¶ŽE are massive amounts of computation going on behind the scenes. The³@TPl¶ŽH lightning is drawn during this time, but it is drawn in the same color³Ž@TTv¶ŽI as the sky, so nothing visible is lONNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž NNNNNNNNNNNNNNNNNNNNNN”””ūhappening. Somehow, lightning is not³@TT€¶ŽH nearly so impressive if it crawls along at a snail's pace. Therefore,³Ž@RTжŽF it is drawn in the background color, and "flashed" by redefining the³Ž@R”¶Ž color map.³Ž@8žĄٵB#,B,Kœžµ1Ž’£µ$¹NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ‰čNNNNNNNNNNNNNNNNNNNNNN”””ū2ŽK¤¶Ž, Clear the screen³@:8؁„°Ž’)ҶŽ,# \ Four lines of text in the first³@.: ²  ¤¶,! \ installment. Tab to the 20th³@<. ¼›µ!޽Ÿ ¤¶Ž,$ / column so as to not cover up the³Ž@<Ɠޒ)J¶Ž, / moon.³@8м ,"It is a dark and stormyĪ,NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ŗŁNNNNNNNNNNNNNNNNNNNNNN”””ū night. You huddle"³Ž@:8ڼ ."under the blankets, listening to the howling"³Ž@4:ä¼ )"wind and the creaking shutters, waiting"³@(4ī¼ "desperately for the day..."³Ž@(ųŠ»¶Ž, \³Ž@2Š»H¶Ž,# \ Draw the lightning in the sky³@$2 µAo4PR‡NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žļŠNNNNNNNNNNNNNNNNNNNNNN”””ū½¶, / color.³Ž@&$$ѵ1wÕµ1Ž,Հյ1ŽÕ‚Õ²¶, /³Ž@8& ĄٵB#,B,Kœžµ1Ž’£µ2ŽK¤¶Ž, Clear the screen³@8*…°Ž’+Ŗ³Ž@  4  ¤³@ >›µ!޽Ÿ ¤³Ž@H“Ž’+z³Ž@8R¼ ,"What was that? You heard a noise from the"³Ž@88\¼ -"front r&NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žÜ»NNNNNNNNNNNNNNNNNNNNNN”””ūoom. Was that just a noise from the"³@88f¼ ,"wind, or an animal, or.... You cautiously"³Ž@88p¼ -"enter the other room, and turn on the light"³@&8z¼ "to see what is there...."³Ž@&„ˆ½#¶, \³Ž@6Ž‹µŽ?tzįG®{½$¶, \ Turn on the light with ŻäNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žūµNNNNNNNNNNNNNNNNNNNNNN”””ūa³@@6˜…µ(Ž?ÅĀ\(õƵ(?ęøQė…¹»L¶, / resounding (?) click.³Ž@@¢„½#¶, /³Ž@8¬ĄٵB#,B,Kœžµ1Ž’£µ2ŽK¤¶Ž, Clear the screen³@8¶„°Žžš-³Ž@  Ą  ¤³@ Ź›µ!޽Ÿ ¤³Ž@Ō“Žžš-’³Ž@8޼ -"It was only the screen door slamming in·VNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žȄNNNNNNNNNNNNNNNNNNNNNN”””ū the"³@:8č¼ /"wind. Well, it looks as though you won't get"³@<:ņ¼ 0"much sleep tonight; more clouds are rolling in"³Ž@<<ü¼ 0"and it looks like the storm will get worse...."³Ž@< µ! »¶, \³Ž@ µ! »H¶, \³@ µAo4H½¶, \³Ž@DŌNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž×NNNNNNNNNNNNNNNNNNNNNN”””ū $$ѵ1ĀÕµ1Ž,Հյ1ŽÕÕ²¶, \ Draw the second and third³Ž@4D .µ! »¶,# > lightning bolts as the user,³@,4 8µ! »H¶, / oblivious, reads on.³@, BµAo4<½¶, /³Ž@& L$ѵ1źÕµ1Ž,Հյ1ŽÕÕ²¶, /³@& V„½#¶, /³Ž@8 `ĄٵB¶~NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž®ęNNNNNNNNNNNNNNNNNNNNNN”””ū#,B,Kœžµ1Ž’£µ2ŽK¤¶Ž, Clear the screen³@28 j»¶,$ Don't need alpha raster for a while³ŽĄN2 t&¶ŽA Draw the thunderhead -------------------------------------------³@2N ~€Š€‹»¶,! Anisotropic scaling for ellipses³@ 2 ˆ'†¶, Position of clouds³@8 ČNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž7qNNNNNNNNNNNNNNNNNNNNNN”””ū ’Š°Žžą1Ö¶Ž,! \ Put the random numbers in an³@68 œČææ…쐶, \ array to guarantee that the³Ž@@6 ¦‚Čæµ!ģµ!ŽF萶Ž,# > same random number sequence is³@8@ °“Žžą1(¶Ž,# / used when the clouds gradually³@$8 ŗ)•¶Ž, / cover up the †NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž@NNNNNNNNNNNNNNNNNNNNNN”””ūmoon.³@T$ ĶŽI Here's where the action is----------------------------------------------³@>T ĪĄ µPŽ@õļµ!Ž<č»m’+½¶7 One minute from now...³@2> ؊»h’)½¶, Move clouds every ten seconds³Ž@42 ⁻i‚’,½¶Ž, High priority flash interrupt³Ž@0LNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žQNNNNNNNNNNNNNNNNNNNNNN”””ū4 ģ-€¶,# Lightning struck since int'pt set?³Ą0 ö.¶Ž ³Ž@0 -·3¾¶Ž, We need to reenable interrupt³Ž@&0 ææ…ģ»i‚’,½¶, Random wait³Ž@0& -€¶," No, we haven't seen lightning yet³Ž@0 ¹³@. (.–¶Ž,! looplooplooplooplooplooplooploop³Ą. 2,ܕNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žb"NNNNNNNNNNNNNNNNNNNNNN”””ū¶Ž³Ž@( <0æƒģæč¶Ž, How many strokes?³Ž@,( Fæ„쿁č¬123(¶Ž: Which stroke?³Ž@., P-¶,! Yes, a strike. Reset interrupt.³@ . Zŗ³ŽĄ8  d1¶Ž+ Left stroke ------------------------------³@8 n0°ŽžŠ5³Ž@ xˆĶ»L³@ ‚ˆĶ»L³@ ŒoŪNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žrNNNNNNNNNNNNNNNNNNNNNN”””ū“ŽžŠ4ҳŽ@  –ŗ³ŽĄ8   2¶Ž+ Middle stroke ----------------------------³@8 Ŗ0°ŽžĄ5„³Ž@ “ˆĶ»L³@ ¾ˆĶ»L³@ Č“ŽžĄ5V³Ž@  Ņŗ³ŽĄ8  Ü3¶Ž+ Right stroke -----------------------------³@8 ę0°Žž°6³Ž@ šˆĶ»L³@ śˆĶ»Lq~NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž A-NNNNNNNNNNNNNNNNNNNNNN”””ū³@ “Žž°5ڳŽ@  ŗ³ŽĄ8  (¶Ž* Heat lightning --------------------------³Ž@8 "0‚č°Žž 6Ŗ³Ž@ ,µ! €€µ?Ó333333»L³Ž@ 6µ! €€µ?©™™™™™š»L³Ž@ @“Žž 6`³Ž@  Jŗ³ŽĄJ  T+¶Ž< ---------------------------------------------------ŠeNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ~NNNNNNNNNNNNNNNNNNNNNN”””ū--------³Ž@ J ^»³@@  h›µ!ށ½Ÿµ*"Harry! Turn off the lights and come back¤³@@@ r›µ!Ž‚½Ÿµ)to bed. It's only another thunderstorm!"¤³Ž@ @ |‚½#³@"  †›µ!Ž„½Ÿµ "Yes, dear."¤³@ " ‚½#³@,  š‹µŽ?tzįG®{½$¶, (The light switch)³@&, ¤…€€€8NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž 'ONNNNNNNNNNNNNNNNNNNNNN”””ū»L¶Ž, Window goes black³Ž@ & ®»t¶, Turn off interrupt³@  ø‚½#³@8  ĀĄٵB#,B,Kœžµ1Ž’£µ2ŽK¤¶Ž) Clear the screen³@,8 Ģ»¶, Last time we'll need alpha...³Ž@ , Öŗ³ŽĄJ  ą)¶Ž< -----------------------------------------------------------³Ž@ŠāNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž ¾ŲNNNNNNNNNNNNNNNNNNNNNN”””ūJ źµ! »H¶, Cloud color³Ž@: ō''µ?¹™™™™™šź¶Ž,! Move clouds to the left a little³@: ž4Š°Žž:¶Ž7 \³Ž@. '4Čč4‚Č»¶7 \ Replot same cloud³Ž@.. »D…»B»>¶7 > formation a smidgeon³@(. '‹æµ!Fģč»¶7 / to the left³Ž@( &“Ž4žü.NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž éNNNNNNNNNNNNNNNNNNNNNN”””ū9d¶Ž7 /³Ž@  0ŗ³Ž@  :½³Ž@T  D¶ŽI ************************************************************************³€ĄĄĄĄ 2@d@d`<P@@ČpNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žŲŗNNNNNNNNNNNNNNNNNNNNNN”””ūP@@  Ą NĀ’’ū ’’äĢNģ“ ä ;6;Ė0 €’’’ü;· €’’’ų €’’’ō;£ €’’’š €’’’ģ;"€’’’ų;Ė,€’’’š;Ė0€’’’č;Ė4@ @ µ^NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žė‹NNNNNNNNNNNNNNNNNNNNNN”””ū žsStrokeStrokeXYSkewBottom ThicknessDxR1R2³Ž@  X¼ ³Ž@T  b¶ŽH This is a recursive lightning-stroke subroutine. When is calls itself,³Ž@PT l¶ŽE it starts a branch at its current position. This new bradNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN!•‚ „}…ń†eˆŁ‰M‹ĮŒ5Ž©‘‘’”y•ķ–€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€€NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNĀĀĀüNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žØNNNNNNNNNNNNNNNNNNNNNN”””ūnch will be³@NP v¶ŽC narrower, and will its bottom end will be no lower than the parent³@N €¶Ž stroke.³Ž@8 еŽ?ąó·d×¶, Ignore it if it's too thin³@8 ”»¶, Pick up the pen³Ž@2 ž» ¶,$ Loop until "Bottom" of bolt reached³Ž@22 Øæµ—˜NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž®™NNNNNNNNNNNNNNNNNNNNNN”””ūŽ?ąźææµŽ@ģčü쐶Ž, \³Ž@(2 ²萶, > Figure next position³@*( ¼æµ?陙™™™šźüµ@ģ萶, /³Ž@* ʵŽ?šņ·“³Ž@0 Š»¶, \ Make a fat bolt if necessary³Ž@$0 Ś»Dµ?ąģ†»B»>¶, /³Ž@$ äøŽ䳎@( 4NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žūŹNNNNNNNNNNNNNNNNNNNNNN”””ū&¶Ž, Otherwise a skinny one³@( ų¹³@ 搶Ž, \³Ž@: µ1–źüµ1–퐶Ž,! > Should we start a new branch?³@":  µ(?™™™™™™šģóŽ·ø¶Ž, /³Ž@6" ŌüÕüÕæµ?ąźüƒģÕµ1Ž–æµ1–ģčÕæģÕ²³Ž@(6 *»¶, Come back to bifurcation³@( 4¹³@, >)łNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žČūNNNNNNNNNNNNNNNNNNNNNN”””ūó»“¶Ž, Low limit reached yet?³@, H±³ ĖENNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žQlNNNNNNNNNNNNNNNNNNNNNN”””ūP10 ! ************************************************************************G20 Surface: SUB Surface(Surface(*),Opaque,Front_edge,Back_edge,Crt)*P30 !------------------------------------------------------------------------!P40 ! R~NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žb]NNNNNNNNNNNNNNNNNNNNNN”””ū Copyright 1983, Hewlett-Packard Company !P50 ! All Rights Reserved !P60 ! !P70 ! This subprogramqNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž7NNNNNNNNNNNNNNNNNNNNNN”””ū receives a two-dimensional real data array and !P80 ! plots the surface as a series of lines of constant row; one row in !P90 ! the data array results in one line on the plot. !P100 ! »NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž?NNNNNNNNNNNNNNNNNNNNNN”””ū !P110 ! Surface(*): A 2D real array whose values contain the height of the !P120 ! surface at that point. It need not be square. !P130 ! Opaque: A logical variable speciØšNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””žNNNNNNNNNNNNNNNNNNNNNN”””ūfying whether or not the sur- !P140 ! face is to look opaque, i.e., whether or not to remove !P150 ! the hidden lines. If Opaque is true, hidden lines will !P160 ! be removed, and the bottom may be ÅvNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž '0NNNNNNNNNNNNNNNNNNNNNN”””ū(depending on the !P170 ! data) a different color. This occurs to help under- !P180 ! stand the data. If opaque is false, the plot will be !P190 ! all one color, and the whole surface will be«zNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN”””ž rcNNNNNNNNNNNNNNNNNNNNNN”””ū visible. !P200 ! Depending on the data, this may cause the plot to look !P210 ! cluttered. !P220 ! Front_edge, These specify the height in GDUs that the front edge S