ZAURUS (PI-5000/PI-6000) BASIC Tips Copyright(c)1995 E.Kako ザウルスのアドインの高速化 １．ザウルスのＣＰＵについて 　「ザウルスってＣＰＵは何を使ってるのだろう？」ということを疑問に思ったことはな いでしょうか。インテルの８０ｘ８６シリーズの省電力版が使われていると思っている人 も多いようですが、これは違います。実は、ザウルスにはシャープ製のＥＳＲ−Ｐという 独自の８ビットＣＰＵが使われています。 　このＣＰＵの特徴は、ルーツがポケットコンピュータ用のＣＰＵであることと、省電力 ということ、１ＭＢのメモり空間があること、８ビットＣＰＵにしては処理速度が速いこ とがあります。一般的な１６ビットＣＰＵと比べるとこのザウルスのＣＰＵは非力で貧弱 です。携帯情報ツールにはＣＰＵの高速性はそれほど必要ないという意見もありますが、 検索などの速いレスポンスが必要な場合には高速に動作して欲しいものだと思います。し かし、実際にザウルスを使っているとメモリの空きが十分ならば遅くて困るというほどの ことはないです。 　あと他に、Ｚ８０が手書き認識用サブＣＰＵとして使われています。ザウルスの手書き 認識ソフトは、情報技術開発センターという所が開発したものを採用し、これをザウルス に搭載するためにＺ８０を搭載しています。これによりメインＣＰＵの負荷を減らしてい ます。また、液晶画面制御用のコントローラーもＣＰＵの負荷を減らすためにチップ内部 にＶ−ＲＡＭを持っており、チップ自体がウィンドウの重ねあわせなどの機能を備えてい ます。ザウルスの場合、メインＣＰＵが貧弱でも周辺チップでこれをある程度は補ってい ると言えるでしょう。 ２．アドイン機能について 　ザウルスのアドイン機能についてですが、これはザウルス上で動作するＢＡＳＩＣイン タプリタです。このＢＡＳＩＣは、シャープのポケットコンピュータ（ＰＣ−Ｅ５００シ リーズ）のＢＡＳＩＣがルーツになっています。 　ザウルス用のオプション機器として、プログラムＢＡＳＩＣカード（ＰＩ−３Ｃ９５） というＩＣカードが以前から企業向けに発売されています。アドイン機能はこのＩＣカー ドからプログラム編集機能を取り除いて、アドイン選択メニューを追加したもののようで すが、細かな点が２〜３箇所ほど異なっています。ＢＡＳＩＣカード開発キット（ＥＮ− ７Ｄ）も同時期に単体で発売されていました。これのおかげで、アドイン開発キット（Ｃ Ｅ−ＫＴ１）が発売される以前からフリーウェアのアドインソフトが開発され、ＮＩＦＴ Ｙ−ＳｅｒｖｅのＦＥＮＯＴＥフォーラムにて公開されています。私もマインスィーパー （ＮＩＦＴＹ　ＦＥＮＯＴＥ　ＬＩＢ２−２５１）などを作成しております。 　実際にアドインを作成を経験した人の感想として、「プログラムの実行速度が遅い」と いうのをよく耳にします。例えばＦＯＲ〜ＮＥＸＴで１００００回の単純なループを実行 すると約８秒もの時間がかかります。ＢＡＳＩＣインタプリタなので遅いのは当然なので すが、これほどまでに遅いと、ちょっと凝ったプログラムを作ると処理速度の面で実用に 耐えなくなってしまうことがあります。 　ザウルスに内蔵されている手書きメモやインクワープロなどのソフトは実行速度が速い ですが、これはＢＡＳＩＣではなく何かコンパイラ言語を用いて作成されていると思われ ます。内蔵ソフトのようなレベルのソフトを作成しようとすると、実際にはＢＡＳＩＣで はほとんど無理なので、機械語を用いて根本的な対策をしなければなりません。しかし、 アセンブリ言語でのプログラミングの習得は非常に困難で、一朝一夕ではできません。さ もなくば、そのソフトの作成をあきらめてレベルを下げるしかありませんが、ＢＡＳＩＣ でもちょっとした工夫により実行速度を改善する余地が若干残っておりますので、以下に 紹介いたします。 ３．アドインＢＡＳＩＣのテクニック 　アドインＢＡＳＩＣでプログラムを作成する際に役立つと思われるテクニックを紹介し ます。 　アドインＢＡＳＩＣは、一見してマイクロソフトやＪＩＳのものに似ていますので、そ れらのＢＡＳＩＣを使ったことがある人ならばある程度のコツはご存じだと思います。し かし、アドインＢＡＳＩＣはポケコンＢＡＳＩＣが元になっていますので、従来のポケコ ンのプログラムとの互換性を確保するためにいくつかの独自の仕様を装備しています。そ して、その独自の仕様はマニュアルに記述されていませんので、これらについても紹介し ます。 　また、アドインＢＡＳＩＣが登場する以前に企業向けに販売されていたＢＡＳＩＣカー ドでは、アドインＢＡＳＩＣのマニュアルに記述されていないいくつかの命令を持ってい ますので、これも紹介します。 （１）マルチステートメント 　一般的なことですが、マルチステートメントを使って１行にたくさんの命令を詰め込む と実行速度が向上し、記憶容量が節約できます。その反面、やりすぎるとプログラムリス トが見づらくなるという欠点もあります。 　例） 　１０　Ａ＝０ 　２０　Ｂ＝０ 　　　というプログラムは、 　１０　Ａ＝０：Ｂ＝０ 　　　と書けます。 （２）１０進数の定数 　アドインＢＡＳＩＣの特徴として、中間コード形式のメモリ効率が非常に悪いというの があります。特に定数については１つにつき１５バイトもかかっています。このせいでア スキー形式でセーブしたほうが中間コード形式よりもサイズが小さくなるということが起 こり得ます。ザウルスのメモリは大して多くないのでプログラムのサイズが大きくなって しまうのは深刻な問題です。対策として、定数を１６進数にするというのがあります。こ のＢＡＳＩＣでは１６進数は頭に＆Ｈまたは＆をつけて定義します。例えば、２５５とい う定数は、＆ＦＦと書けば３バイトですみますので１２バイトの節約になります。また、 ０という定数は＆０と書く代わりに＆のみで書くことができます。反面、実行速度が少し 落ちます。 　例） 　Ａ＝０：Ｂ＝１　は、 　Ａ＝＆：Ｂ＝＆１　と書けます。 （３）括弧の省略 　シャープのＢＡＳＩＣの構文の特徴の１つとして、関数に括弧が必要ないというのがあ ります。ただし、複数の引数を持つ関数には括弧が必要です。括弧を省略すると実行速度 が向上し、記憶容量が節約できます。 　例） 　Ａ＄＝ＩＮＰＵＴ＄（１）　は、 　Ａ＄＝ＩＮＰＵＴ＄１　と書けます。 （４）代入文 　代入文に限って、区切りにマルチステートメント以外にコンマを使うことができます。 コンマで区切ったほうが実行速度が速くなります。代入文のＬＥＴが省略されていますが 、省略されていて見えないＬＥＴ文を実行する回数が減少するためです。 　また、計算結果の代入について、掛け算よりも足し算のほうが速いことを利用すると実 行速度が速くなります。 　例） 　Ａ＝５：Ｂ＝Ｃ＊３　は、 　Ａ＝５，Ｂ＝Ｃ＋Ｃ＋Ｃ　と書けます。 （５）ＧＯＴＯ文 　ＧＯＴＯ文については文法が何種類もあります。まず１つ目は単純に行番号を書くもの です。これが一番実行速度が速いです。２つ目は演算型ＧＯＴＯと呼ばれるもので、計算 式の結果として得られた数値を行番号とみなし、その行番号に制御が移すことができます 。昔のポケコンにＯＮ〜ＧＯＴＯ文が無かったのでその代用として用いられていました。 ３つ目はマイクロソフトＢＡＳＩＣなどと同様のラベル指定です。ちなみにラベルとして ＊のみのラベルも使用可能です。４つ目は文字列ラベルを使うものです。アスタリスクの ラベルと同様に使用できます。５つ目は文字列演算型ＧＯＴＯです。文字列ラベルと演算 型ＧＯＴＯとをあわせたようなものです。 　ＧＯＴＯ文に限らず、ＧＯＳＵＢ文やＲＥＳＴＯＲＥ文なども同様に書くことができま す。特に文字列演算型ＲＥＳＴＯＲＥ文と文字列ラベルを用いたＤＡＴＡ文とを組み合わ せると、高速な文字列データ検索として使用することができます。 　例） 　ＧＯＴＯ　１００ 　ＧＯＴＯ　Ａ＊１０＋１００ 　ＧＯＴＯ　＊ＬＡＢＥＬ 　ＧＯＴＯ　”ＬＡＢＥＬ” 　ＧＯＴＯ　Ｂ＄ （６）ＩＦ文 　ＩＦ文は、ＴＨＥＮを省略して直接次の命令を書くことができます。この場合ＬＥＴは 省略することはできません。ＩＦ〜ＴＨＥＮ行番号と書いたほうが、ＩＦ〜ＧＯＴＯ行番 号と書くよりも実行速度が速いです。ＥＬＳＥ文がＩＦ文の数より多く存在してもエラー にならず、無視されます。 　例） 　ＩＦ　Ａ＝０　ＴＨＥＮ　ＧＯＴＯ　１００ 　ＩＦ　Ａ＝０　ＴＨＥＮ　１００ 　ＩＦ　Ａ＝０　ＧＯＴＯ　１００ （７）ＦＯＲ文 　ＦＯＲ文において、ＮＥＸＴの後ろの変数を省略することができますが、省略したほう が実行速度が速くなり、記憶容量が節約できます。その反面、ループの入れ子が深くなる とＦＯＲ−ＮＥＸＴの対応がわかりにくくなります。 　あと、一般的なことですが、ＦＯＲループを使うよりも処理をならべて書いたほうが実 行速度が速くなります。 　例） 　１０　ＦＯＲ　Ｉ＝０　ＴＯ　３ 　２０　Ｄ（Ｉ）＝０ 　３０　ＮＥＸＴ　Ｉ 　　　というプログラムは、 　１０　Ｄ（０）＝０，Ｄ（１）＝０， 　　　　Ｄ（２）＝０，Ｄ（３）＝０ 　　　と書けます。 （８）ＥＶＡＬ関数 　ＥＶＡＬ関数は、シャープのＢＡＳＩＣの中でも独特のものですので初めての人は使い 方に悩むと思います。ＥＶＡＬ関数は引数として１つの文字列を持ち、この文字列を式と して評価して、その値を返します。式には数値を返す計算式だけでなく、文字列の計算式 も用いることができます。文字変数に関数を記憶しておいてマイクロソフトＢＡＳＩＣの ＤＥＦＦＮと同様の使い方をするのが一般的な使い方です。また、ＥＶＡＬ自身もＥＶＡ Ｌの引数に用いることができます。 　例） 　ＰＲＩＮＴ　ＥＶＡＬ　ＣＨＲ＄（Ｉ）＋”＄” 　　　で、変数Ａ＄〜Ｚ＄をアクセスする。 　Ａ＝ＥＶＡＬ”ＰＥＥＫ（ＡＤＲ）” 　　　で、一般の関数を呼び出す。 　Ａ＄＝”ＥＶＡＬ　Ｂ＄”：ＥＶＡＬ　Ａ＄ 　　　で、ＥＶＡＬ関数自身を呼び出す。 （９）ＩＮＫＥＹ＄ 　ＩＮＫＥＹ＄というのは現在押されているキーのコードを返すためのものですが、ＩＮ ＫＥＹ＄１とするとキーが押されるまで入力待ちになります。ＩＮＫＥＹ＄０というのも ありますが、これは普通のＩＮＫＥＹ＄と同様の動作をします。ＩＮＫＥＹ＄は、ＩＮＰ ＵＴ文などの前でキーバッファをクリアするために次のようなプログラムを書くことがあ りますが、これはＫＥＹ文を使ったほうが楽です。 　例） 　３０　ＩＦ　ＩＮＫＥＹ＄＜＞””ＴＨＥＮ３０ 　　　というプログラムは、 　３０　ＫＥＹ　０，”” 　　　と書けます。 （１０）ＧＰＲＩＮＴ 　ＧＰＲＩＮＴ文は、ポケコンのＧＰＲＩＮＴ文とはデータのＭＳＢ，ＬＳＤが逆になっ ていますので、プログラムの移植には注意が必要です。他にも、ポケコンではＬＩＮＥ文 で箱形を塗り潰す場合に１６ビットのラインスタイルを指定することができることを利用 して、ＬＩＮＥ（０，０）−（３，３），＆５Ａ５Ａ，ＢＦなどとして一定のパターンを 描画するというテクニックがありましたが、アドインＢＡＳＩＣでは使えませんので注意 が必要です。 （１１）ＢＴＥＸＴ＄ 　ＢＴＥＸＴ＄は、現在実行中のプログラムのファイル名”Ｓ１：ＴＥＸＴ．ＢＡＳ”を 得ることができます。これを設定することで他のプログラムに制御を移すことはできませ ん、ＣＨＡＩＮ文を使うべきです。ポケコンでは、特別なファイル名”ＣＡＲＤ．ＢＡＳ ”を指定することでオプションのＲＯＭカードプログラムの自動実行がサポートされてい ますが、ザウルスではうまく動きません。 （１２）ＢＤＡＴＡ＄ 　ＢＴＥＸＴ＄は、現在のＢＡＳＩＣ変数のファイル名”Ｓ１：ＤＡＴＡ．ＢＡＳ”を得 ることができます。これを設定することも可能です。 　例） 　１０　ＢＤＡＴＡ＄＝”Ｓ１：ＤＡＴＡ．ＢＡＳ” 　２０　Ａ＝９９ 　３０　ＰＲＩＮＴ　Ａ　’９９ 　４０　ＢＤＡＴＡ＄＝”Ｓ１：ＤＡＴ２．ＢＡＳ” 　５０　ＰＲＩＮＴ　Ａ　’０ 　６０　Ａ＝７７ 　７０　ＢＤＡＴＡ＄＝”Ｓ１：ＤＡＴＡ．ＢＡＳ” 　８０　ＰＲＩＮＴ　Ａ　’９９ （１３）ＣＯＮＳＯＬＥ 　ＣＯＮＳＯＬＥは、プリンタに出力する桁数を設定するためのコマンドです。マイクロ ソフトＢＡＳＩＣのＣＯＮＳＯＬＥとは命令の意味が違うので注意してください。ザウル ス用ＢＡＳＩＣカードにはこのコマンドがありましたので、たぶんアドインでも使用可能 だと思いますが、筆者の手元にはプリンタがないので確認できませんでした。 （１４）ＴＯＵＣＨ 　ＴＯＵＣＨ　ＯＮ／ＯＦＦで、タッチパネル割り込みの許可／禁止ができます。この他 にＴＯＵＣＨ　ＳＴＯＰという命令があります。割り込みを一時保留にするための命令だ と思いますが、未確認です。 （１５）ＷＡＫＥＵＰ＄ 　ＷＡＫＥＵＰ＄は、これに日時を文字列で入力しておき、その指定時刻に電源を自動投 入してプログラムを実行するためのものです。ザウルスでは正常に動作しませんでした。 （１６）ＢＡＳＩＣ 　ＢＡＳＩＣというコマンドがあります。ＴＥＸＴというコマンドと対になっています。 これはエディタに対してモードをＢＡＳＩＣ編集モード／テキスト編集モードに移行させ るための命令です。ＢＡＳＩＣカードでは使用可能なのですが、アドインＢＡＳＩＣでは 動作しませんでした。 （１７）ＲＥＳＥＲＶＥＤ 　ポケコンで作成した中間コード形式のプログラムをザウルスのＢＡＳＩＣカードにロー ドしたりすると、ザウルスに存在しない命令の部分がＲＥＳＥＲＶＥＤ＆Ｈ？？と表示さ れます。この＆Ｈ？？には中間コードの１６進数の値が入ります。ＢＡＳＩＣのエディタ 上でＲＥＳＥＲＶＥＤ＆Ｈ６０と入力するとＰＲＩＮＴ文が入力されます。このとき中間 コードの１６進数は必ず＆Ｈをつけて入力しなければなりません。＆のみだとエラーにな るので注意が必要です。このＲＥＳＥＲＶＥＤは隠しコマンドを探すときに重宝します。 　例） 　１０　ＰＲＩＮＴ　”Ａ” 　　　というプログラムは、 　１０　ＲＥＳＥＲＶＥＤ＆Ｈ６０”Ａ” 　　　と書けます。 （１８）ＰＥＥＫ 　ＰＥＥＫという関数があり、メモリの特定の番地に記録されているデータの値を調べる ことができます。アドレス＆０〜＆ＦＦは、ＣＰＵの内部ＲＡＭの内容がアクセスされま す。ＰＥＥＫ＠Ｗを用いると一度に１６ビットアクセスできます。これに対してＰＥＥＫ ＠Ｂというコマンドが隠しコマンドとして存在しますが、普通のＰＥＥＫと動作は同一で う。他にＰＯＫＥやＣＡＬＬ，ＬＯＡＤＭ，ＳＡＶＥＭといった命令もあります。 　例） 　Ａ＝ＰＥＥＫ　＆４００００ 　　　で、４００００番地の内容を調べる 　Ｂ＝ＰＥＥＫ　＃２，＆４００００ 　　　で、メモリバンク２を調べる。 　Ｃ＝ＰＥＥＫ＠Ｗ　＆４００００ 　　　で、ワード単位で内容を調べる。 　Ｄ＝ＰＥＥＫ＠Ｂ　＆４００００ 　　　で、バイト単位で内容を調べる。 （１９）ＩＦ文（その２） 　ＩＦ文において文字変数が空であるかどうかをチェックする特殊な構文があります。 　例） 　１０　Ａ＄＝ＩＮＫＥＹ＄ 　２０　ＩＦ　Ａ＄　ＰＲＩＮＴ　”＊”ＥＬＳＥ 　　　　ＰＲＩＮＴ　”　” 　３０　ＧＯＴＯ　１０ （２０）ＵＳＩＮＧ 　ＵＳＩＮＧのパラメータの文字列には、従来のポケコンとの互換性のために様々な仕様 が存在します。￥￥は、一部のＢＡＳＩＣカードでは日本の通貨記号￥を表示せず＄を表 示してしまうことがありましたが、アドインＢＡＳＩＣでは正常に動作します。 　例） 　１０　Ａ＝−１ 　２０　ＵＳＩＮＧ”＃＃”：ＰＲＩＮＴ　Ａ 　３０　ＵＳＩＮＧ”＃＃−”：ＰＲＩＮＴ　Ａ 　４０　ＵＳＩＮＧ”＊＊＃＃”：ＰＲＩＮＴ　Ａ 　５０　ＵＳＩＮＧ”￥￥＃＃”：ＰＲＩＮＴ　Ａ 　これらのコマンドは、川久保氏が作成したＢａｓｉｃＥｄｉｔｏｒ（ＮＩＦＴＹ　ＦＥ ＮＯＴＥ　ＬＩＢ２−３３２）を用いてテストしました。アドイン開発ツールキットＣＥ −ＫＴ１は、標準的なマイクロソフトＢＡＳＩＣのコマンドを中心に限定したコマンドの みに対応しているようですので、今回紹介したコマンドで対応していないものがあります 。 参考文献 　プログラムＢＡＳＩＣカード開発マニュアルＣＥ−１５１Ｄ，シャープ 　プログラムＢＡＳＩＣカード開発マニュアルＥＮ−７Ｄ，シャープ 　ＰＣ−Ｅ５５０，ＰＣ−１４９０Ｕ活用研究，工学社 　ポケコンジャーナル，工学社