■、■MDW…団 ISSN0389-5254 表紙:東京国際空港 JAPANAIRCRAFTPILOTASSOCIATION <コラム> 中部新空港の早期実現を望む.…・………………………………・……栗崎教雄…2 <航空気象> パイロットに望まれる知識は何か……………………………………中山章…4 <特集:東京国際空港> 沖合展開後の羽田空港の管制運用………………東京国際空港長小田原員…10 <航空局通達> パッセンジャー・ストップの取り扱い(試行)の一部改正について……………15 データ通信による飛行計画等の取扱いサービスの試行運用の開始について……17 ヘリコプター騒音の軽減について………………・…………………………・………・21 <運輸省> 「間違い」についての一考察…………運輸省航空事故調査委員会長江努…22 <気象庁> 運航用気象(OPMET)情報の提供……………航空気象管理課北脇安正…30 <外国資料>、 ヘリコプターの計器飛行と異常姿勢について…………………訳:佐藤裕…34 <寄稿> 快適だった「政府専用機」…・………・…………………………・……秋草政雄…41 ポケットコンピューターによる航法計算⑧………………………佐野浩樹…47 北九州空港の現状と問題,その将来…………………………………山野辺孝一も・・54 <医食同源> 手作り健康法のすすめ(28)………………………………キャプテン・マエネ…59 <エッセイ> 気層の底で(19)..…………………………………………・…………宮田豊昭…64 <部会・委員会活動> 座談会一地球環境問題を考える③−…………………………定期航空部会…74 <事務局だより> 年末調整について………………………………………………………………………86 新書紹介一航空気象一一航空六法一……………..………………………・87 <ATSシンポジウム> 第15回ATSシンポジウム研究発表………………………………………………88 <エアポートシリーズ> 東京国際空港………………………・…………………………………・…・……………102 PILOT,November1,1993 −1− 『・ロ『 一一 E に I N EE F S ロ 声 T … R E “ S WN T S … F ◎ R 以 叫 A S N A V C O M Ⅱ S c 吃 N T F 噂 c l賂腿 一 同阿回回国図回田回回 琴,__I−−L−L÷v:一二一且一全 Q囚国回回回凹回回回 唾雌 Xディスタンスチェッカー ? : 倫国]面魂回恥回恥四目 AEI 雌雌抽圃四日田 議蕊鍵 CAI H f Ⅲ 園縁回平田回回回嘩口 佐野浩樹 − 笛髄曲回回回国 箇箇由回四国回 ポケットコンピューターによる航法計算C は地点入力の方法に工夫してみます。 今回は,地点名をつぎつぎと入力して 今回のプログラムは,以下の5つのブ いき,各区間と出発点からの合計距離を ロック(サブルーチン)に分けて構成し 計算する『ディスタンスチェッカー』 ています。 を紹介します。 INS装備機では,すべてのウエイが イントを入力した後,入力ミスがない力 どうかをチェックする方法の一つに 「ディスタンスチェック』があります( 間違いなく入力されていれば,出発点力 ら到着点までの合計距離は,あらかじM 計算されている距離と一致するはずです が,1ケ所でもミスがあれば,すべてα ウエイポイントが一直線に並んでいな↓ 限り合計距離にズレが生じ,間違いを勇 見しようというものです。 今回紹介するプログラムも原理は同上 で,各区間の大圏距離を足していくだけ ですが,なかなか便利なものです。 単に足し算を繰り返すだけならばポケ コンにやらせることもないので,ここて PILOT,November1,199J −47− iポケコン内部に記憶させてある地点 名による入力 NE ↓↓ 22 NE →KCC,BOMAP,RJTTぐ」 今回のプログラムのメインの部分です。 E s (Na.Ea) L J f e 垂 皇 杢 f /AIPに公示されているすべての位 位霞検索/計j 算 プログラム 置通報点と陸上飛行場の緯度・経度を 二而口 データ文で登録してあります。 日本における航法援助無線施設の識 大 圏 距 離 計算 プ ロ グ ラ ム 別符号は2文字または3文字,位置通 一ホーホ 易尋 離離 区間距離昌 合計距離ヨ 報点は,FDPのシステム処理上3文 字または5文字のアルファベットで構 RETURP 成されていますので,2文字,3文字 に記憶させてある地点名,緯度・経度を または5文字以外のアルファベットを 検索します。 入力した場合には,このルーチンをス キップして次の『ユーザー地点の検 ③磁針偏差の計算 索』に移行させ検索時間を短縮してい 入力された地点の磁針偏差を比例配分 ます。 法により計算します。今回は,北緯25. 入力した地点が登録されていない場 から45.,東経125。から150の範 合には 囲では航空図からプロットしたデータ, NOFILEDOO この範囲外では近似式で計算しています‘ と表示します。 ④p-6法による位置の計算 ある地点から,ラジアルと距離によ上 iiユーザー地点名による入力 表わされる地点の座標を計算します。 →JAPAぐ」 ユーザー地点登録用のファイルが作成 ⑤ユーザー登録地点の検索 されている場合には,ユーザー地点を ユーザー地点が登録されている場合¥l 検索します。 は,この地点を検索します。 ユーザー地点は100個所まで登録で きます。(1993年Na4参照) 地点の入力方法としては,次の6つの 方法を用意し,どの方法で入力したかを ●●● 1皿 極座標による入力 ポケコン内部で判別させ,上記の各サブ →3205.12ぐ」13127.36← ルーチンに分岐させて処理しています。 →3205.2ぐ」13127.6← −48− PILOT,November1,1992 計算に必要な緯度・経度を直接入力し 左下に区間距離(LEGDIST),右下に ます。秒の単位は,10進法でも60進 出発点からの合計距離(TTLDIST)が 法でも構いません。 表示されます。 入力メッセージに対して何も入力せず ivジオレフによる入力 →MC2705J に実行キーを押すと,プログラムが終了 します。 世界地理座標標記法による入力です。 米軍や自衛隊ではよく使われますが, あまり一般的ではありません。 また,β−8法による入力では,次の2 ‘通りを用意しました。 °基準地点が登録されている場合には, vある地点からのラジアルと距離によ る入力 →KMC12045J 地点名に続けてラジアル,距離を入力 します。→KMC12045J ・基準地点が登録されていない場合は, SID^STARなどでよく見られる表 「丙引キーを押すとp-e入力モード 示法です。磁方位から真方位への変換 になりますので,緯度,経度,ラジア を自動的に行います。 ル,距離の順で入力します。 プログラムを入力してから電源を入れ ると自動的に立ち上がります。ただし, ユーザー地点用のファイルが作成されて いない場合は,このままですとエラーに なりますので,53ページのリストのう ち1940行から2040行を削除し,1930 行を〔リスト1〕のように変更します。 また.3000行以降の地点データは, 地点名の最初の文字がAで始まるグルー プからZで始まるグループの順番で並べ てありますが,今回は誌面の都合により, それぞれ2箇所づつしか書いてありませ んので,AIP等を参照して追加してく ださい。 1888:K=100800 1890:FOR1=1TOK 1900:READp$ 鱒10:IFP$=F$ロRP$="E"L ETI=K 頚20:NEXT Tp1罫75 2050:' 誼60:READ2$ 2070:f1=<LENZ$)/2 2080:N$=MID*<Z*ili4>+”. "+f1IH$CZ$i5fM-4> 2090:E$=T+MID$(Z*ヲM+l >4)+¥"+MID$(Z$jM+ 5’例−4》 2100:GOSUB*N:GOSUB*E 2119:IFLENN$=6LETN$=N $+早叩 2120:IFLENE$=7LETE$=E $+v“ 2130:GOTO1320 入力メッセージのあとに,前述の6つ のどれかの方法で地点を入力していくと. PILOT,November1,1993 〔リスト1〕 −49− # I 登録地点名による入力 3 6 2 3 . 3 7 ぐ 」 13624.26J 1 2 0 篭 」 4 5 ぐ 」 極座標による入力 3000行以降が地点データで,航法援 助施設,位置通報点の座標を登録してあ りますが,メモリーを節約するため,経 度は10度の位からとしています。 登録にあたっては,最初の文字がAで プログラムのうち,10行から250行 始まるグループからZで始まるグループ までがメインルーチンです。140行で大 でまとめてあり,入力した地点名がどの 圏距離を計算します。 グループに属するかを判定し,1600行 270行から310行は,方位表示のため の処理です。たとえば,30を030に変 でそれぞれのグループへと振り分けます。 例えば,TAEを検索する場合には, 4900行から4920行まで,(最初の文字 換します。 340,350行は,同一地点入力の チェックで,続けて同じ地点を入力する がTで始まっているグループ)のみを検 索させ,検索時間を短縮しています。 各グループの最後に登録されているE と はストッパーで,これが検出された場合 SAMEPOSITION と表示します。 370行から540行までが,緯度・経度 には入力された地点が登録されていない ものと判断し,ユーザー地点登録の検索 へと移行します。 の入力チェックです。また,秒の位を 10進法で入力した場合には,ここで60 進法に変換します。 5600行以降に飛行場データを書き込 んでありますが,これもメモリーを節約 560行から870行で磁針偏差の計算を するため,飛行場略号は最後の2文字の 行い,北緯25。から45.,東経125。 みを登録してあります。検索時間を短縮 から150・までのデータ(平成3年の するため"RJ∼”で始まるものを データ)を書き込んであります。範囲外 5600行から,"RO∼”で始まるものを の場合は,580行で近似計算を行います。 5700行からと分けています。 −50− PILOT,November1,1992 T口︾M叩Q二D●国。二t−.。.●一︾︽コワ全二40句名“q・一子.二一込巳.一コEJ﹄、●.巨剖②4..宮・︾・二4。冒畠︺・二q0ロム︺一E一J一F□ごJヲI−roラーー医︺ラロロニ侭︺一一口ロ|ヲ■白。。﹄・]I。。ヲ■。一q一宮一QQ一qニーーロロローウハ己一 二一M叩p0雷ゴワ士4,−コ4○一コ4○をゴ賃J4U置J40﹃。4。〆、一口R︾戸口〆、直﹄ラー〆bフ8〃bラー員︺。︺﹃rR︺ラーQ︺負︺qヴロ︺ハブ︽ぜ︽ソニソ ○4●●1凸ノク、〃︹ごフー00凸︽M︾列守寺、︾Q︺?’1▲n脚︺“今“今ラーヲーn画0■&丹守宮︺ラーハロ、UうふAT〆bつIny−Aズゴ刈守QUラーnU4.4言ゴA叶うIラー②U ●●かみUV二TU写ヘゴ句、一劉叶一公ざA叶一▲ヨpq04時宮J剖叶直J列守直J目︺Eu直︺戸口か崖︺〆寓︺〃。〃h︾〃h︺ラーラ0ラーヲーラL﹃〃I、冥哩︽哩凹ユ型︺。︺Q︺QU一旬づ︽uグ︽再ゲ︽ヨダ 便0■g︻時恥T■凸土や︽利︺141凸巨J凡守口︺フ0う壬︵M︶目﹄手gnフ戸bワー︹U虞︺ズゴ︽M召畠︺更ゴqザフー︹&nU頁U1斗qザヲー︵基1&目U測守n○口︺つ凸90の宮J丘J TATIUn今f、、︽己Q︺1凸OL4○貢哩、。Q︺0■とう凸洲寺戸口ラー︽ソ、︺寺。4叶う,ラー︹り、︺刈叶守コヲーラー1凸、︶ん可一コQUフー1A仇匂弓︺一コQ︺ラーワ↑ vハク■、︵り一身う︽4○一コ4,−コ洲守胃一胃︶40目︺4。産。40R︾一口R︺一口少b〆b70戸口ラー門戸ラーヲーnoラーロリヲー、ロロ︺qダニ廿︽ソ、。qごqグ ︽KE﹄,T01▲ロ︺例︾1凸一コ40ラーQU︹り1凸4,一コラーラ0舎1&︹口巨J一.QU偶︺ワ色︽り目﹄一コ︵ソ〆bう垂qザクロ一コ14〃b一身qジブ1言ゴ︽り〃、一身 ︽UN叩をマN叩夕日、や。旨︾4○一コ4.一コ4U4。貢J40宜J4.臣J宮﹄〆b一。少b一。〆b〆、﹃rヂ。ヲ0A︾﹃Iラー﹃rラーQUR︶︽UQ︺Q︺、。qヴqゴQグ、フ ︽Upm二F、?﹄一。︺一コ−&〃。40︽り70﹃。︽U﹃r茜ヨ、り〆b4p︽ソフーワ︽1凸巨U4o︽廿負U1今1今4。︽ロ︹5口︺1ムヮ﹄4oEJラー︽ソニリう今4・今b 〆屋︺mMU●●M叩︾︽一言ゴn号一︽ゴA守タキ4斗n斗目︺ん牛目︺回り直り賃︺ごJ医迎宏屋︺宏屋︾〆函︺〃h︺〆h︺涙h官?Oラー﹃fOラ0ラーラ0、ローH︺、。ハロ口︺、。ログ︵︺ヴ︵国ゴ︵uご 〆、復マニ、〃言7,4。︹Uヲ0一コ−.〆。乱丁QU︵己句ニーム巨凶匡型Q︺R︾1△?︽4○EJラーqザ︽りへ皇◇−.A︺畠︺Qゴ︹り﹃今﹃自負︾R︾︹りニソーコワ︽ラ0 ,︾、型勺ニレ、一.言ゴ列守一コ4○4,釦守40404幹巨哩宮﹄宮J宮︾宮︺宮︾畠︺虞︺夕b〆、少b〆◎?0ラーヲ070つ1ラーQ︺oUQ︺n口QUq㎡R︼Qざqゴ︵ソ ーヒハ同ロ0●今*,。デーA︾1A︵り︽ソ4.−コう全ラーR︾産﹄︵り員︺︹ううニー上う全戸、4・上b︵リラ8qザ一身例︶一コラー言己少bくりA︺R卓4△q切言ヨヲーうニラ−14宮JR︺4口、○4,二U1LラJ1△40︵U4.ラー4︲昼︺︹りう−4●L nKE﹄M叩、,、グM叩一身言ゴう﹄4口亨身うふ4○4○へ星4.4.可−404口zゴ巨型宮J﹃。−3厘J一コごJFU4・デログb40R︶員︺目︺良︺7OEJグロラー目︺つIフー自一ラーロ︺クロフーロリ〆ロロUQU70QUQづうInoqゴ﹃r向う、フQU nU︽KJ、■グ︽Kラ0ズ一︽U戸口﹃aqJR︶今︽ユリ宮﹄一.QUA︺1△ニリ︻。一コ、フヲ0ウー例口安b4。︵ソ勺l・﹃合00凸虞︺4。R︾ラー言二−︽ラー4.例宮二画4. ●p ●● ●● ●● ●● ●■ ■■ ■■ ■■ ●● 0● ●● ■● ■■ ■● ●● ■■ ●■ ●■ 、。D・ro T0ooI﹄9凸p︲Ⅱ︺︿H一合う畠An4oへ丞八H4.つムハ向4.−ゴハH4︲︾コハH一口一コ︿H直J剃守︿H〆b4.AH〆b4.︽H員︺一己八Hラーニ司八同ラーーョハ同フー〆DAHQUR軍AHQUラーハH昼U﹃f︿HqゴヲIAQごno︿HQヴニ廿 ︵ごU’八局+AT6T8704pTl例︾ラーTI﹃.nUTIラー4○一I︹りぅITI﹃コニりTlラー﹃当T0nUラーーl4o1LTIヲI40Tl1凸○UTl4ワー▲TIラー︻aT014QざT04︲ワ︽〒l負哩ヂbT01&qJT04q一コT0二廿畠︺ 一上v0p0仇︾仁﹄AH寺。う一AH4○う一︿H4o﹃コハ両4○一△八両[ご寺an向医u4.八両ごU4oAH〃b知守八H質U一口内向月毎医J︿HヲIごJA向う−A︶白亜ラー〆bAnQU信一AHQUヲI八HニごラーハHQJ70︿、qゴー5A同qざn口 pmnU二心午qLnR飼JQ︺医J、型1上司。n型舟時40︽、型﹃1厘J、“、四八口、星4斗う︽、型ラー宮哩詞型品りqゴnuA守宮ヨ、“ラーゲbnJ00一品口輪U4守刈吟、型ラーラー洞uq444nu4守利叶、型ラーロリ荊型4L4Lnu舟守匡J、望。︺︹。 nJ U仇哩 、凶 一M ︶企 口n 回n 回n 口仇 U、 卿曲 U﹄ 品白 哩︾ 口ラ 守ー n。 画︺ n伺 口う ロ晶 ロ凹 n1 U4 nう U︽ ロ一 “コ 四型 曲予 乙 匡 F D︽ 歩b 、ラ 歩ー 、、 〆。 口Q 良ザ ︺n 守口 I9 フ二 0八 写ワ Iー ラ雷 ーゴ ラ4 ー. ラ臣ー ラー ラー 弓I ﹃I ロリ ロ︺ Cu ロ︺ 口︺ 冠〃。。pハー.便﹄$ラーT八nUnU雪、グp恥$QUT4nUn︺二、ノ霊巨抄F匡刃ザノ、寺旦向以戸UAHI﹄言医Joof、pハー﹄V0pm ﹄一画UⅡ一一“’一MⅡⅡ︻Mn一一り一日一*一,一一一E一一日三一U−rE−岡一*l−U4.T,一亭上二一・一J三2二一UnK二一・J*.、口々・’一四一一一︾一Z| I ︿ H ・ 。 巨 J O L M N n U 千 I 宮 U 9 A 、 ︲ 宮 ﹄ R u T I う 犀 ﹄ N 叩 リ 0 1 4 マ コ ヘ ム M U V O − 1 F 宜 J リ 0 へ〒 4 P 上F n上 KP 午E I︵ 妙。 侭M 。H P甜 上叶 N。 m/ q、 華グ 宜n りU Ⅷ+ 問n 戸U UM N叩 叩刈 F守 ﹄/ Pq 上ゲ qバ づ寺 戸十 上n 戸U U一 MT 皿と 一n 、K U− や0 11 N〆 叩、 一手 PI 上尋 ニ当 レ, 瓜。 〃v もn 一u へ叩 基, 令垂 子仁 p砂 恥 二 。 。 A H O L N m O L ︵ U 〃 § q 診 ん 守 Q ザ p 恥 O ゴ M 叩 F ﹄ f 、 F こ 面 野 p 肌 p O 二 十 蝋 I ﹄ , 叩 Y 凹 叩 1 J 仇 〒n IU EM J叩 m。 U︸ 二L や︹ Iリ qグ ザ、 〒q Iづ 千n 1U ごq J ︲ L T J 〃 1 リ 0 ︹ し P 上 室曹 R︽ Uし N子 ”! 。︹ 。し Ⅱp U恥 Mニ 叩マ ︹ー Uq 千ジI I 岡 叩 n u 子 I R U NT 叩I o二 NM mm A0 HL ノ* 、〃 直k ﹄叩 ︹U ご・ 全・半 千 1 . 。 二 十 ︸ I + ︹己︲LT4UやI。.戸UN叩pハマーTlnU戸上oU戸UN叩p恥戸UTlnU7△。。罰IFこへLMUnUpmE﹄▼Jnりl﹄Mn穿戸上金マ叩N ︾M、仁﹄14p,nK一M叩、ノf、qザ戸UMnnU:E﹄、〃f、、フn口盾﹄n︺リーうふ〆。■G︺●、叩Vq㎡uMが、口“f、TI二ⅡU 八 同色︺ooMmo.M叩一宮J品U4亘凸MⅡ一目︺仇曹o014T0p限4.n口*nU+1人。。*、U︹ごMY会子TI Ⅱ︺E﹄一Mm■.nU●●一M叩f、1凸凹間一筆N皿、U岡川、︺ⅡUp0:M叩f、1▲一一M川圃曹一MⅡ、哩仙Up恥一MnTLp型Mm/口QnUnK■CMU●■+o■品四M岬mYnUこい .’﹄pInU1▲I﹄一M叩、〃、︺MmTlnJ二1﹄E﹄、〃n口E﹄T6洞凹仁﹄一MmnU1LF、4巳L1△い、〃nUp“、〃TI14f、p恥官﹄ ワ凸匡﹄P上TIT凸二︿Hロハ、グ口智E﹂﹄M胴戸。八同p晩、ひn画Fこ一邸叩仁﹄仁﹄T▲*一今ノ*リー医JⅡUuM−Mm/TIARnK Mmn︺E﹄TLTIe︺叩Tn︾TI、ノ仇曹TOI﹂八両:Mv−一nUTI3J−LTlニー﹄八H二一匡JnRnU7D、〃Uゲロハロ一T凸、J生子Mn叩r●● 叩側雷直りp型内間TL●、二月学一Mm仇︺1八一Mm〆、ラー一Nm1LここJ帥胴n口、ノーMmラーn口MnF﹄TI仁﹄今fnu1Ln凶宮J二EInUI﹄二目智nuTL。●り り限1凸与。COM隅国︺n口N叩/、TLユリ、JTp4雪毒p恥一上/、T凸垂U仁﹄T八二二nKooMmニノ、〃、、唖Oを寺T4p必戸Uf、⑪Y。T上こりu0MH TlM叩nUG︺14p0T1︽り*Mn1上巨迎〒IE﹄ユリ*︹K盾﹄、凸目︺TI︿HMm二・。へ星TI画野十AHワ﹄負︺1LuⅢ冠、十二・一K十 :NEXT:KEYIj'R・妙+CHR 30:LOCATE10fl:PRINT"* 3 ●● 40:CLS:DEFDBL:WAIT0 DISTANCECHECKER*' 50:LOCATE1.0:input"No. 1.;F$:IFF$=鯵.BEEP 60:JAN=l:GOSUB*PSN:IFS 1:CLS:END 70:F1$=F$:N1=HN:E1=EE:N1 =160TO49 f=NN$:El$=EE$:GOTO20 80:LOCATEl.UPRINT"No. 8 2,2) U+I1ID$(STR$<LEG+2)> 90:F$='"':LOCATE4+LEN(S F$:lFF$=りりBEEPi:CLS TR$LE6),1:INPUT。¥: ”9:JRN=1:60SUB*PSN8IF 8END 110:F2$=F*:N2=NN:E2=EE:N 2$=NN$:E2$=EE$ S=160TO286 i20:6OSUB*SI1E:IF3=IG0T 130:A=N1:B=N2:C=E2-E1 O280 140:D=INT((ACS(SINA*S INB+COSA*COSB*COS ABSC))*600+0.5)/10 159:DT=、T+、:LE6=LE6+1 160:D$=STR$D:DT$=STR$D 170:IFD=IHTDLETD$=D* T 180:IFDT=INTDTLETDT$ +U、9リ 190:F1*=F2$:N1=N2:E1=E2: =DT$+叩.8’ 200:CLS:WAIT0 N1$=N2I:E1$=E2$ 210:LOCATE1.0:PRINT'No ●■ ),292)+マリ+F1$+U .り+i1ID$(STR$(LEG+1 220:LOCATE19.0:PRINTN1 V 230:LOCATE2,3:PRINT"LE GDIST:TT $+りり+E1$ 240:LOCATE129ヨ:PRINTn$ LDIST:U 250:LOCATE32,3:PRINTDT $:GOTO80 269:’ 230:HDG*=I1ID*(STR*HDG, 299) 2798*HD6 290:IFHDG<10LETHDGfs" −51− PILOT,November1,1993 ●●●■■■●● 8ワ+H、6$ nK9*TLnUnK︵し﹃自信﹄︿Hg.*G︺・硬寺T4TLnUnUnUTL戸口Tl。二尺二H1.*c︺金子T▲T4nU一UTL臣UTLnK,*Mn。。T△/、TL、〃、ノooMmp0E︺U0u皿、ノハHⅧY7▲+v○ヘム 8.+H、6$ 便﹄昼UF、TINm1﹄,T上N叩二仁︲E0、JRK二信︲/仁14.盾﹄一上仁﹄二仁’一卜、〃、︺二仁リノF1舟吋仁﹄皿vこいnN叩盾814N叩十もグU?二nU十二*、ノ$F0勺AH寺. $13:KEY5.""'+CHR$1 一.一コ一身一コ一コ言ヨ﹃。﹃。一身44040拘守4q4o4叶斗4口4555賃︺匡J555︷ご5歩ロ〃b〃b6〃b 300:IFHDG<100LETHDG$= ●●■■□■巳■■■■DB ●合●、●● ゆ■■■GQ ●■■●●●●、●■ ●■●.●●●●ロ句■●弓●●●●ワ●p n ︾仇︾9998︽U 6︽り9一Ⅲ■. ︹固99,Uユリ︹U0具■り 89R︾R︺具騨99,︾8︹U ︵り89, ︶9 44へ皇一身405Pb﹃f︵罫q壷R︾’1,4言ざ4,5Pb寺1,口qザ、︶’八ワー一コ40−,〆b﹃f、。qゴ︵り4人へ4−コ4○ 10:ARUN:CLS:WAIT58 20:FORI=2T010:KEYl,"" 一 95993991 88689 890:*PSN 900:S=0:ID=0:A=ASCLEFT* ETF$=MID$(F$,2j9): 60TO1959 940:IF64<AANDM=6G0T0 1喝9 950:IF64<AAND64<BGOT NRTES−−v 100O:GOSUB1880:locate1 6.2:PRINTNSi'N" 1010:LOCATE153:PRINT" .E妙 1020:LOCATE14.3:INPUT" .;E$ 1839860SUB*E:IFS=16OTO 1818 1040:E$=I1ID$(STRSE.2.9 ):A=LEHE* 1050:IFA=5LETE$=E$+妙.9 9 妙 1060:IFA=7LETESsES+'O" 1679:6OTO喝26 9 “ 1110:RETURN 1126:, 1138:A=ASCLEFTS(FS.l): F=ASCMIDS(FS2j1> ):D=VALMIDS(FS.5. 6 ) 11 :B=VALtllDS(FS,き『2 11 1100:IFA=6LETNSsNS+'O" ●● 1890:IFA=4LETNS=NS+ワ.9 1 1080:N$=MID$(STRSN.2.9 ):A=LENNS 11111111111 li0:PRINTU−−COORDI ●● 990:CLS:WAIT0:LOCATE1 1 988:N$=FS:FSs'CDH":GOSUB *N8IFS=iRETURN ●● 960:IF64<AGOTO1240 97989 − O1558 ●■g● 9目981F176<AGOTO1959 1&1と 929:IFF$=妙咽OTO1400 O。■、Ce (F*,1):M=LENF$ 910:IFLEFTS(F$,n=''>i"L 1上1&4“4 (Ff.l):B=ASCRIGHTS 匡一 ・︺ 二K 一じ P〆 ︹凶 10 一二 n. |、 −口 。一 一。 一一 一・ 一J |二 |Ⅱ ’p +Ⅱ 一I R− pⅡ I一 ’。 一一 一T 一一 コくn 1D▲ 、一+ 人J7 .0, ︲,L 。R・ 盾’0 企|み 八一千 p−O U一. ︹一。 lF。一秒一一H一U 71661851831821999988 pm守in︺、。FrQldL﹃11▲1▲ロロTJTO、J句&︿H八両4人虹ノTlF上仁﹄AHE﹄・DDI1△ワ.。。。︿H ︹ U 二 〃 、 一 一 ワ ﹄ 一 一 n U n U , F こ 一 合 , M Y p 八 二 − ▲ 。 。 P 上 二 M V 往 々 p 恥 仇 U N 叩 ‘ 雫 I M n ワ . p 恥 ク ー . AH−ap恥OLN叩N叩1LPこP上OL〒I牟今OL,﹃。ニノ、︽。一N叩。。令寺*︹uoo17△、︺Fこ︹。かみf、口︾︽平 らり 守I二 nUN QN ︾m 二F 二﹄二F二 *n U眉 ,目 ﹄ 戸 し, +︽ ︹し ごaU U。D 。︹Lし ﹄二 14 ︹雪 44 4人 人I ︲﹄ L甲 pO一 vA Hn U マ コ リ 。 〃 、 こ毎 F 〃矛 、, 〃。 、 I昼 p︺ 0、 nノ U眉 F n千 吋1 盾︹ ﹄し n︺ “ ロ “p n曲 UFu rご リロ ハ二。 、上 品匡 り﹄ 〃F 、U今 .言 ゴ冠 かみ少 。*1n U 。 。 皿 U Nこ 叩届 便、 0企 便み︾ AH Fこ リ* デIp 子ハ 。グ fロ八 みDnUTI千I千−千IやIF﹄nUOL年才全寺宮0今幸金子p︲宮01今v︹ごp、。.便﹄Tl〒’千’二宙回即UOL0LmUuNiL 870:DATA100101103185106 18718716819818819819 pmnUp咽ぞ、Fこ戸こ仁﹄戸上F﹄。。︹己、U働竺〃lPrAHRKE﹄〃1面、/、JN叩nUMU子IaU〒InuAHMN牟孝叩UNmp0八HAHp八nUp0人HAH nU〃、RUAH目︺OLOLI﹄OLILn〃品U︹UT4f、p八nUFこMUN即nUNmnU戸UマーE﹄賃﹄八H八脚r︺FこFr侭ごpmM”?←叩vnU千1Mm午lUv n“〆、n画十.上T1MM戸し今斗nU曾竺今矛︹apmnoノーnUv回︶便﹄1﹄1△︽しnKnUn“N叩、U伽UTL面〃二nUnUTlハロー n回Qグpパイ、っIE0宮0八HAHAH仇︺1凸ニハョ、型か等I﹄二nU〒I︹UⅡu4吋’1.十二p恥ズゴヘェnUI﹄T4FrpmFU〒1..八HAH二戸UoD?人︽ご 〃、ロハワlnUEU写○昼J〃、〃、例︶二〃、〃、nUnp二企みAHT4nuAHノ、二FrPUTlO上傍Uノー企み卸NOC二I﹄*蝋oOv▼八ⅡUooE﹄甲p恥p恥〃、。。リ詞″両型 Qづnu雪d八貿三へ皇n口守Iワ﹄局壬、。04叩U.▼J価画M叩1△叩Y︽H〃、N恥FE8Fこ盾﹄E﹄N叩︿HnUnUnD0。¥甲。。〒In画、屈甲ooAH4jリ。。 418319219”990979959 92899988 q6凸41丑qDLdR▲。J凸00︽40▲4日& 16318418419518419419 匡J︿HQゴp八﹃?0つI+フ0勺Iラ8.*︵。。、仁,〒I写側”二p恥︵ごp恥IL︵Up恥nUnJ〃、こり▽J二7.ⅡUリ千l︽砂信﹄雪。←二かみ屍K二余や 筑凹弓InUnUFr︿HM叩nUPmTJ1▲、︺Un︽矛二AH令矛nUMU二二44千1二k可FEN叩︽。ご︺〒lリ二叩U戸rp八N叩二七寺八HpO今才︽ご d6d:DATA097098100101103 ●● ”990989979956946929 89687884 T4qヴnu官OAH︵UN皿▼4▽l官﹄TLTllcum0o幻叶,Fr︹し、ノーN”P恥︵ごoonUT4p恥F上戸r八H︽ご戸U,uNFEuNリTlTJ夕7.戸Upm9︵し?上FrMNv−▲TJp恥・97.便﹄、″。, 1”18119118110119119 Pr/、nK二TO二便0戸r二仁0戸rF’二涙U仇︺、U二・oO4F上八局かみp恥︹○Fr千IFやMH電nUMH行UN師Fr︿同FrnUNmILuN*心幸p1o1ooAH︵ごく両p恥戸r眉﹄︵。nu 1 ■●。■■■●■●、●●■●●●●●●●●● ●。■ ●●●● ■●●●●●●●●●●●●9CG ︵ り 8 9︾ ︽ りL ︹︽ り星 例﹃ ︸身 ︹4 U0 85 R6 一﹃ 日r 98 仇9 ︾例 例口 ︾0 ︹4 り●2 例 ︾身 例4 ︺. ︵ り 4 0R 5︾ 69 壷9 r 89 9︽ RU ロ︽ ーU ・R へ︾ 星6 ﹃R 9宮 4同 0︺ 59 多例 b︾ ﹃皇 rり 、︵ 。り q︵ザりR ︲ 一 5 .11今1今.L1凸ワ﹄う−2ワ﹄22︽42今坐ワ﹄一.↓。一身﹃今亨今﹃今一身一コ一コ一コ404,4口404.4. 1 850:DATA894895097098099 q 1460:IFDS<=0BEEPl:GOTO 1459 14708, 1480:DEFDBL:X=RA-VAR:H= NN8E=EE 1490:IFX<180LETE=-E 1500:D=DS/60:A=ASN(COS X*SIHD*COSN+SINN *COSD〉 1518:B==ACS(〈COSD−SIN N*SINA》/(COSN*COS A))+E 1520:N=INT((DUSA*100)* 100)/100:E=INT(ABS (DMSB*100)*100)/l 00:DEFSNG 1530:HDG=RA:GOSUB*HDG:F $=F$+じり+HDG$+''VD S$:ID=0:GOSUB1080: GOTO1040 1549:9 1550:IFMO40RAO82G0T0 1606 15688ID=38Q$=F$:RESTORE 5699 1570:IFLEFT$(F$2)=''R0 "RESTORE5700 15898F$=N1,$(F$,3,2〉:GO TO1889 159889 16”80NA−6460SUB16199 162991639,164991659 >'1660>167011680)169 9,17”,l710P1729J17 39,174991758,176991 77991789917”ゥ1899, 1818,182991839,1840 5l850ild60:GOTO188 6 1610:RESTORE3000:RETURN 16298RESTORE31988RETURN 1630:RESTORE3208:RETURN 1640:RESTORE3300:RETURN 1650:RESTORE3400:RETURN 1660:RESTORE3500:RETURN 1670:RESTORE3600:RETURN 1688:RESTOREヨ799:RETURN 1690:RESTORE3800:RETURN 1700:RESTORE3900:RETURN 1710:RESTORE4000:RETURN 1720:RESTORE4180:RETURN 1730:RESTORE4200:RETURN 1740:RESTORE4300:RETURN 1750:RESTORE4408:RETURN 1768:RESTORE4588:RETURN 1778:RESTORE4680:RETURN 1730:RESTORE4780:RETURN 17988RESTORE4888:RETURN 1888:RESTORE4988:RETURN 1818:REST0RE5888:RETURN 1820:RESTORE5108:RETURN 18ヨ88RESTORE52998RETURN 1848:RESTORE5388:RETURN −52− PILOT,November1,1993 一コ 4句 .一 日〆 一塚 一、 5| Z0 −6 一q 一蚕 U細 一8 ︸4 一︹ 一1 4. qへ 一・ R一 二ワ 画口 一宮 ︶ 4 入’ 一4コ &身 句一基 □一 匿●J り’ 4一号 4− O1L グ一 へ︽& 守− n5U 斗U 句一壬 。目 ﹃︺3 &4 ワ.ー コー 宮を﹄ ︺︺ ﹃RI う & 6 4 一 身 n U 直 り n 口 4 幹 O L 1 ▲ 口 ︶ 4 4 q づ 0 人 例 ︺ ︹ & q ヴ ズ ゴ ロ リ ワ ー n 口 ワ ー 貢 ︺ ↓ 。 到 今 Q ざ 一 コ q “ − 4 晶 四 A 守 1 ▲ 一 コ 言 ジ 4 0 q づ へ 坐 劉 守 4 帝 q ザ 一 身 一 コ 一 コ 例 萱 肉 守 ふ り 勺 I 今 I ヲ − − 9コ 入っ 宮’ ︺ズ ︽ゴ 塁丹 〆吋 ○舟 言叶 ﹄〆 、ロ 野一 局コ &n 同U 一守 直I ﹄局 言基 ︺司 一星 身n 4U 弓q Oジ L︹ 直。 ﹄一 ラコ ー0 一人 コご 4︺ 斗幻 一等 コn 〆斗 、4 0。 44 a斗 U茜 ワゴ ーっ 1全 △句 、壬 り 4 ︲ 局 星 つ 全 貢 ﹄ n 口 n 口 n U 一 コ 巨 J 〆 ロ ︵ 四 〆 。 4 ○ 巨 J n 口 ? ﹄ Q ㎡ 今 冬 R ︾ 0 人 宮 ︾ 舟 守 一 コ 、 U 〆 4 斗 へ & ヘ ム 狗 牛 0 1 喧 J q ゴ 0 4 一 コ 4b 帝0 QA l一 一身 コ歩 勺、 と口 画U 萱晶 Q哩 U宮 4﹄ 人4 寺1 a巨 一凹 コ一 Qコ づ寺 ・I 人9 44 0う 巨﹄ 智勺 1△ ︽0 41 弓刻 寺 宮 ︺ n U へ 星 、 。 4 斗 n 口 O L 4 斗 4コ 。手 。一 置コ 哩匡 J号 ハ﹃ ロ一 コ言一 ,一 一9 コ. 一コ 一7 コ40 コ4, 守身 A守一 コ1 一身一 コ, ︹己一 コ一 EJ 〆b星 〆、 b 一 , 4 白 コ 7 コ一, ,刃一 , コ コ 今 局涙y 竺 9 NP 叩 1F , 9型, F 仁H ﹄ ﹄脚 7︽一 F Fレ, ﹄ IA ,H9 . し、一 F 亡川一 ﹄ U便局 , , Fr 上J 箔ロ こ盾 ㈲﹄ 〃n 八こ 同A 価盾 、、 し﹄ Fし ハ千 緬叩 A︹ H、 rこ 恥岡 Ny “n ︿H ︲, 、同 便﹄ ●巳●●●●●●■●●●●●●①■■■●■■■■●●■●●●■■■●巳●●●●●●●、0■■、■■ロ●●●●■巳●■■●●●●●■●e●●●■●●●●QQ0 nun凹置U、型一.輪〃詞J1人気J司竺掘り毎J40密Uzゴ私邸nJ今I価リワーnJnu医JnJ今.﹄、“洞型寺。、ul▲nUnu﹃当n母4Lnunごn哩帝UEJ価UnunU価UごJ、型hぎらり、〃︽名、型,詞U、。、″う﹄詞〃,、型ワ︽誼JR︺弱〃 AH︿H︽H〆bAHAH八同八HAH八H4八八HAHAH4LAH︿H4吋八H臣J︿H︽H︽HQグハ耐︿H4斗八H口廿AHAHAHnごAHへH毎基AH︾。︽HAHAH﹃コハ同︿HAHAHAH︿H・’八H E﹄晶裡nuE﹄p恥p恥Fこ︵。GU便﹄〒I〒IF﹄MU叩UFこり0”vF﹄刑閃叩脚FこvnU八FヒリIUl贋﹄守延フ﹄FこAHハ同戸上全H毎J便﹄ ︿H︿同︿H︿H八同︿同︽H八H八両AH八H︿同︿H︽H︽H︿H︿H八両︿Hハ向AH八H八脚AH︿H八HAH︿HAnAHAH八両AH八両AH︿H︿H やIやI〒I千’千I千1︸ITI〒ITl干I千I︾l羊I〒I千ITO︸I千’千IT︲〒’千IT︲子ITO〒IT6TIやIやITO千I?’子I〒I千I nUn口一n口一口UnU、りnU.nU、唖面野nUnUnunU品U一nUnU、巴n口一口︺nU一nUnUn口曲U品り品り口U、茸nU仇U品UnU一口U画UnUnUnUn口一 分4晶口一04今乙例凹1八︹星、凶1Aワ︽n画14へ一星、U一14︽&一口︺9入へ言名品口1人ワ﹄、理1人うムロU14へ−4口雪64句皇宮ゴー回哩9二J句二言ゴ、︺OLつる EBliツヨ509503629 ETK,4305114321 E FHTf3402063132 FO.33401330233 E GBE,3354243506 GFT,3523173651 HCj3396冨739474 E HFE,3421223224 E 10,24201724105 IJT,2447134119 E JA.31211230510 JAT,3121333049 E KAD,2621427461 KBE,3138263050 LHE,3444483741 E LHT,3444393742 E MBE,3689103755 HDi25502331143 E NA,42595241391 NCy37565939121 OB,42391543154 E OBE,4243544ヨ喝 PQ,34592439524 E 3220:DATAE 唾U畠︺一〃一コ、“︽Ⅱqづ毎U貢ゴーUn型戸口、“﹃f皇″毎U西ごn“4.,凹毎U1Ln“4.nご前型︻anご︽U−UnU﹃.n“戸口二Un型、“40一J稲凹例官n−4.,“一J?︽、ご﹃in︾nご臣︺nHqゴ、“垂〃40,狸ワ﹄n型飛U︽りnU4U ︽凹叩八同へ〃一AH叩AHd0C︿H、再U八H叩▲凹叩心4,︿H叩八H”︽H叩一ムゴ︿u叩︹グー︿H叩人H叩︿凹叩ラーハHA凹叩AH叩言︺八H︿凹即︽H”EU︿H叩くH叩くH叩O0LAum久凹皿00▲AH”ヲ0︿HmAHm︽〃︽︿同八H叩く︼叩︿同▲凹叩▲凹叩︽H叩品﹃ず︿︼叩八叩同︽H叩宮︺ TOTO−,0︾00−11TOTITI手10︸11や01−11↑00TITOTITOTOTITlTITI−II︾10幸’0TOTO−I,Tl−10−10TIやl・や81TO千I・TITI PQE,3456363953 貢JfU皇UR︸ラーラーラーーロ︺月。QUq哉qづ、フ画口画UCU1上9人1人句生う壬う﹄一身一コ一.甜予舟守凡守匡J亡J匡剖臣J夕b〃。台盲EUラーラー守1 列守列帝4吋列叶A守列守4吋刈吋凋守︵子列守紺守列寺Eu昼﹄臣J医﹄EJ臣J宮﹄EJごJ直﹄巨J底叫匡JごJEJ医﹄ごり宮J医JごJごJ臣J宮JごJ貢︺宜J E △一H,一一R一二一H一▲︵H’○m△王H二口”一口叩▲H,on△一u、1,両・ロ”6局今回叩二口叩。︷凹叩・一⑪同▲曲同1m同on▲ハ同an・ハHAH・八同、︿H|︿H今︿H|︿H・nHAH一︿Hハ同八H叩︽H︿HAH叩 D6C933482ヨ3023 ■●■■●●●●●●●●■●G■句●●●、。●●●●●●●●●●●●●■●■●■●■■Q●●●●■●、■■●go●●●凸●●□■■■●■●■●■●●■● 8 ︽’ U2 ︹9 り。 9’ R2 ︺9 90 0人 62 6仇 負︶ 琶︲ ︹L り2 88 具1 凶△ 82 86 同1 す今 仇2 盲9 90 64 8っ ︽︽ U6 60 曲人 ︺う 例﹄ ︾9 9︲ 6← ︹2 U6 ︽0 り4 、2 ︺9 ︹1 U今 82 99 0’ 例1 ︾2 80 0’ 84 9 9 。 18888K=189968 187889 1898:F0R1=1TOK 1988:READP$ 19l8:lFPS=FSORPSs'E'L 1928:NEXT ETI=K 1930:IFPSO'E妙GOTO2060 19498, 1950:WAIT0:LOCATE0.0:P 1960:OPEN''E:USR・DAT'FOR RINT叩[USER]叩 1970:INPUT51.X INPUTAS311 1980:FORI=1T0X 1990:lFEOF(l)LETS=l:l =X:GOTO2020 2000:INPUTJtl.KS,順9E* 2010:IFKS=FSLETFS=・*。 2020:NEXT:CLOSE +F$81=X 2030:LOCATE0.0:PRINT" 守 2040:IFS=1G0T01370ELSE 2188 2060:READ7$ 2959:F 2080:N$=t1IDS(ZS,1,4)+ワ. 2070:n=(LENZS)/2 '+1110$(ZS.5.11-4) 128988E$=U1▽+NID$(Z$,N+1 .4)+"、.+NIDホ(Z$,N十 2100:GOSUB*N:GOSUB*E 5.11-4) 2110:IFLENNS=6LETNS=N 2120:IFLENES=7LETES=E $+り妙 $+vu 2130:GOTO1320 21498, 2150:CLS:BEEP1:L0CATE 0FILED<'';Fs;">':C LS:WAIT0:RETURN 13.l:WAIT:PRINT"N 2168:, 3000:DATAAD,35384939504 3810:DATAAG,43403742270 9 6 3108:DATABASHO.27834328 3020:DATAE 3110:DATAbeach*35332740 5847 3120:DATAE 3498 3200:DATACA,33003129112 3210:DATACH>42400441410 8 8 −53− PILOT,November1,1993 DF,35343539224 1850:RESTORE5400:RETURN 3コ 33 5。 戸罫 b﹃ 〃身 b罫 会き b7 83 9寺 9. Q3 ザ3 83 R︺ 今0 14 う4 ﹄4 ワ4 ︽4 へ畠 44 44 戸4 口4 5 − 34 ﹃4 コ4 ー5 コ5﹃ ︾7 身7 一8 コ、 3。3 3例 3言 守4 当4 414 43 43 4− 4. 444 I860:RESTORE5588:RETURN
© Copyright 2024 ExpyDoc