g€g€iÿdêBASIL n í1100L xëA=4 Ì9 ‚ëB=4 Ì9 ŒñC=100d*A*A+B*B –ñD=»(C)  ú½(D-º(D))<0.001wn˜ ËõC ªóB ´óA ¾õ:â èêSPECTRUM SUBROUTINES L1ñW=32 :ñD=22:ñF=8:í1200°:þ °û:õ¬8,0;:þ ñR=º(N*¥+1):þ xëZ=1 Ì200È*T:óZ:þ Üú¦É""Ëì1500Ü æú¦=""Ëì1510æ ðñG$=¦:þ @ñK$=¦:þ ¤ õ¬Y,X;:þ  õ­(X);:þ lõÂ(11 );:þ ÐõÂ(9 );:þ 4í2200˜:ñK=°("0"+K$):þ ˜ñK$="" ¢!í1500Ü:ú¯(G$)=13 Ëõ:þ ¬,ú¯(G$)É12 ËñK$=K$+G$:õG$;:ì2210¢ ¶ú±(K$)=0 Ëì2210¢ À@õÂ(8);" ";Â(8);:ñK$=K$( ̱(K$)-1):ì2210¢ üû:þ `×.1}LÌÌÍ,Z/10 -6:þ ÄñR$=Â(R+64@):þ ( ñP$=K$(P):þ Œí2600( :ñA=¯(P$):þ ðû:þ TéV$(26):þ ¸éW$(60<,26):þ  ñGG=¯(G$):þ